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Dispersion  Control  System  for  Sounding  Rockets 


1.  INTRODUCTION 

High  altitude  sounding  rockets  have  always  presented  a problem  to  small  test 
ranges  such  as  WSMR  because  of  rocket  dispersion.  This  report  presents  a strap-on 
dispersion  control  system  employing  a 16-bit  microprocessor  as  its  brains,  that 
requires  only  software  changes  to  accommodate  different  sounding  rocket  vehicles. 

The  Paiute -Tomahawk  sounding  rocket  was  chosen  as  the  first  test  vehicle  for 
this  system  because  it  is  the  most  difficult  to  control.  Figure  1 shows  the  payload 
as  it  was  hung  by  ropes  from  the  launcher  during  TM  checks  at  WSMR.  The 
actuator  is  a pneumatic  position,  proportional  canard  control  manufactured  by 
Chandler  Evans  Inc.  A 6000  psi  helium  gas  bottle,  visible  in  the  illustration,  pro- 
vides the  energy  to  move  the  fins.  An  exercise  port  is  available  on  the  actuator 
for  connection  of  an  external  helium  source,  providing  a means  of  exercising  the  fins 
without  firing  a pyrotechnic  which  opens  the  helium  gas  bottle  valve.  Figure  2 
shows  the  rack  in  the  control  section.  A modified  MIDAS  platform  (Gyro)  manu- 
factured by  the  Space  Vector  Corporation  provided  the  error  signals  for  the  control 
system.  Note  that  the  removable  eyelets  at  the  topof  the  rack  allowed  for  .e,%  inser- 
tion and  removal  from  the  control  housing  section.  Figure  3 shows  the  control  sys- 
tem electronics  mounted  on  four  wire  wrap  boards  with  the  16-bit  microprocessor 
mounted  on  the  wall  of  the  electronics  box  for  heat  sinking  purposes.  The  wire 

(Received  for  publication  3 March  1976) 

Preceding  page  Hank 


7 


I 


wrap  boards  are  manufactured  by  Mupac  Corp.  and  used  because  of  their  unique  108 
pin  socket  connector.  The  16-bit  microprocessor  is  the  TDY-52B  manufactured 
by  Teledyne  Systems  Company  and  discussed  in  greater  detail  in  Section  2.  3. 

Operation  of  the  control  system  was  only  during  the  coast  phase  of  flight,  that 
is,  T+5  sec  to  T+17  sec  with  second  stage  ignition  at  T+20  sec.  The  system  is 
capable  of  guiding  through  second  stage,  however.  Range  Safety  required  early  shut 
down  so  they  could  observe  the  gyro  output  and  determine  if  it  is  safe  to  enable  the 
second  stage.  The  system  was  launched  16  October  1975  at  WSMR  with  a radar 
impact  within  a mile  of  a computer  simulated  impact. 
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Figure  2.  Dispersion  Control  Rack 


2.  DISPERSION  CONTROL  ELECTRONICS 

A detailed  discussion  of  the  important  electronic  circuitry  used  by  the  Disper- 
sion Control  Electronics  is  described  in  the  following  sections.  The  complete 
circuit  diagram  is  not  contained  in  this  report  because  of  its  size. 

2.1  Block  Diagram 

F.gure  4 is  a simplified  block  diagram  of  the  dispersion  control  syste;..  elec- 
tronics. The  heart  of  the  system  is  a 16-bit  microprocessor,  TDY-52B,  requiring 
only  a 512  word  by  16-bit  memory  to  perform  all  control  algorithms. 
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Figure  3.  Dispersion  Control  Electronics 


At  rocket  liftoff  a G-switch  activates  the  Interrupt  Start  which  delivers  a clock 
pulse  approximately  every  10  ms  to  the  TDY-52B  interrupt  line.  Every  10  ms  the 
TDY-52B  will  increment  a memory  location,  that  is,  the  TDY-52B  will  also  be  the 
system  clock.  Five  sec  after  liftoff  the  TDY-52B  will  pulse  the  Initiate  Actuator 
signal  releasing  gas  into  the  chamber  of  the  pneumatic  actuator.  Until  17  sec  after 
liftoff  when  the  Lock  Fins  signal  is  pulsed  the  TDY-52B  will  sample  the  Gyro  out- 
puts every  10  ms  and  provide  an  output  to  the  canards  via  the  Pitch  & Yaw  Command 
A&B  signals.  At  20  sec  the  2nd  State  Initiate  line  will  be  pulsed  and  the  TDY-52B 
will  halt. 

Those  blocks  which  require  detailed  explanation  are  discussed  in  the  following 
sections. 


2.2  Gyro  Resolver 

The  Gyro  Resolver  transforms  the  gyro  roll,  pitch  and  yaw  encoder  outputs 
into  positional  information. 

Figure  5 is  the  basic  circuit  used  to  transform  the  gyro  encoder  outputs,  sig- 
nals A and  B,  into  positional  information,  Up/Down  Binary  counter  outputs. 
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Figure  5. 


There  are  three  such  circuits  used  by  the  Gyro  Resolver,  one  each  for  Roll,  Pitch 
and  Yaw.  Signals  A and  B,  Figure  6,  indicate  each  . 08789  degree  change  in  gyro 
position  and  the  direction  of  change,  positive  or  negative  from  the  previous  position. 
Thus  each  change  of  state  between  A and  B is  a change  in  gyro  position  of  . 08789 
degrees  and  the  knowledge  of  the  previous  A and  B state  immediately  following  a 
change  of  state  indicates  whether  the  gyro  moved  in  a positive  or  negative  direction. 


Politics 


.08789° 


— — — - Negative 

Figure  6.  Gyro  Encoder  Outputs 


The  truth  table  in  Figure  7 indicates  all  possible  input  states  to  the  1 of  16  decoder 
and  the  resultant  outputs  to  the  binary  counters.  The  truth  table  is  read  from  top 
to  bottom  for  each  direction  positive  or  negative.  To  change  direction  jump  between 
identical  input  stable  states  and  continue  to  read  down. 

Ignore  for  the  time  being  the  OR  gate  and  D Flip  Flop  in  Figure  5.  The  8 /nsec 
delays  allow  the  transition  states  to  exist  long  enough  to  provide  a clock  pulse,  CP, 
whose  positive  going  edge  will  increment  or  decrement  the  binary  counters  as 
determined  by  the  Up/down,  U/D,  signal.  The  1 fxsec  delay  insures  the  stability 
of  the  U/D  signal  before  the  CP  signal  reaches  the  counters,  synchronization  of 
the  Gyro  resolver  with  the  TDY-52B  is  accomplished  by  the  D Flip  Flop  which  is 
clocked  by  C45,  a clock  signal  generated  by  the  TDY-52B.  Presetting  of  the 
binary  counters  is  accomplished  serially  through  the  OR  gate  using  the  Bias  Input. 
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Gyro  Resolver  Truth  Table 

2.3  TDY-52B  Microcomputer 

The  TDY-52B  is  a 16-bit  parallel  processor  packaged  in  a 2 in.  x 2 in.  x 2 in. 
(Figure  12)  hermetically-sealed  module,  dimensions  are  exclusive  of  its  120  pins. 
Tf  ledyne  Systems  Company  is  the  manufactor  of  this  hybrid  computer  based  on 
National  Semiconductors  IMP-16C  micro- computer.  The  TDY  52B  has  the  follow- 
ing features: 

16  Bits 

60  (implemented  by  CPU  resident  microprogram) 
Parallel,  binary,  fixed  point,  two's  complement 
Multiply,  Divide,  Double  precision  Add  and  Sub- 
tract 

Must  be  provided  externally 
16  word  Lust-In/First  Out  Stack  Internal 
Page  S>  *e  of  256  Words.  For  direct  and  indirect 
mode3:  Absolute 

Relative  to  Program  Counter 
Relative  to  Accumulator  2 (indexed) 
Relative  to  Accumulator  3 (indexed) 


Word  Length 
Instruction  Set 
Arithmetic 


Memory 


Addressing 


Accumulators 
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Input /Output  and 
Control 


16  bit  data  - memory  input  port 
16  bit  data  - peripheral  input  port 
16  bit  data  - output  bus 
16  bit  address  bus 
6 general-purpose  output  flags 
4 general-purpose  jump- condition  inputs 
1 general  interrupt  input 
1 control  panel  interrupt  input 
Figure  8 shows  a simplified  block  diagram  of  the  TOY  52E.  The  CPU  is  the 
heart  of  the  TDY  52B  which  is  configured  around  MOS/LSI  devices,  as  shown  in 
Figure  9.  The  MOS/LSI  devices  consists  of  two  CROM's  (Control  Read  Only 
Memory)  and  four  RALU's  (Register  and  Arithmetic  Logic  Units).  Each  RALU 
handles  4 bits,  and  a 16  bit  CPU  is  formed  by  connecting  four  RALU's  in  parallel. 
A 4-bit  wide  control  bus  is  used  by  the  CROM's  to  communicate  mo3t  of  the  con- 
trol information  to  the  RALU's 


Figure  8.  TDY-52B  Simplified  Block  Diagram 
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Figure  9.  TDY-52B  CPU  Components 


The  Clock  Generator  in  Figure  8 provides  the  CPU  and  external  circuits  to  the 
TDY  52B  with  the  required  timing  signals.  There  are  eight  time  phases  to  each 
execution  of  an  instruction  resident  in  the  CROM.  Collectively  the  eight  time  phases 
are  called  one  microcycle  am'  a number  of  microcycles  is  required  to  execute  each 
instruction  resident  in  the  external  memory.  Figure  10  shows  the  timing  relation- 
ships. Time  phase  4 (T4)  may  be  extended  during  reading/writing  operations  when 
external  memory  requires  slower  access  times  than  525  ns.  The  use  of  external 
circuitry  is  required  to  extend  T4  greater  than  two  time  phases.  For  more  de- 
tailed information  contact  Teledyne  Systems  Company,  Northridge,  CA  91324. 

Figure  11  is  a flowchart  of  the  TDY-52B  operation  starting  with  application  of 
power.  When  power  is  firs*  applied  all  RALU  registers,  flags  and  the  LIFO  stack 
are  cleared  to  zero.  The  microprogram  then  enters  an  initialization  sequence, 
in  which  the  Prograr*  Counter  (PC)  is  set  to  a starting  value  of  FFFEjg,  that  is, 
the  next-to-last  location  in  the  memory  which  is  the  first  executed  instruction, 

2.4  Computer  Houeekeeprg 

The  Computer  Housekeeping  circuit  as  shown  in  Figure  13  provides  the  TDY- 
52B  with  an  approximate  10  ms  interrupt  and  a system  clear  signal  (SYSCLR). 

This  circuit  also  provides  the  PCM  and  debounce  clocks. 
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Figure  10.  TDY-52B  Timinp  Diagram 


At  system  power  turn  on  Reset  is  held  momentarily  low  while  Interrupt  and 
Computer  Start  are  held  high.  The  TDY-52B  will  execute  its  first  instruction 
from  location  FFFEjg  of  the  memory  when  Computer  Start  is  momentarily 
grounded.  To  reset  the  TDY-52B  while  payload  power  is  on  momentarily  ground 
Reset  while  momentarily  turning  OFF  the  TDY-52B  minus  12  volt  supply. 

Interrupt  Start  is  momentarily  grounded  during  rocket  liftoff  enabling  the  in- 
terrupt clock.  C45  in  Figure  13  synchronizes  the  Interrupt  Clock  with  the  TDY- 
52B.  Synchronization  is  required  to  prevent  a positive  transition  during  Time 
Phase  2 (T2,  Figure  10).  Interrupt  Enable  (INTEN)  in  Figure  13  is  set  by  the  TDY- 
52B  under  software  control  and  cleared  automatically  upon  the  TDY-52E’s  recog- 
nition of  a positive  Interrupt  Clock  transition.  Upon  recognition  of  a positive  In- 
terrupt Clock  transition  the  TDY-52B  will  halt  and  not  execute  the  instruction  from 
memory  location  0001  until  the  Interrupt  Clock  is  zero,  hence  the  use  of  the  last 
D Flip-Flop  in  Figure  13. 
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Figure  12.  TDY-52B 


2.5  Memory  Interface 

The  Memory  Interface  circuit  provides  the  necessary  timing  and  control  sig- 
nals for  interfacing  of  the  memory  with  the  TDY-52B.  Figures  14  and  15  make  up 
the  Memory  Interface  Circuit  while  Figure  16  was  used  in  place  of  Figure  14  during 
software  development  of  the  dispersion  control  system.  See  Figure  17  for  circuit 
timing. 

The  Timing  Interface  Circuit  of  Figure  15  extends  T4  to  allow  adequate  access 
time  to  the  CMOS  RAM's.  During  a read  microcycle,  address  information  is  sent  out 
at  T4  and  the  TDY-54  B expects  data  back  at  T7  of  the  same  microcycle.  During  a write 
microcycle  data  is  sent  to  the  memory  during  T4  of  the  next  microcycle.  The  TDY-52B 
employs  latches  on  its  address  lines  eliminating  the  need  to  store  address  informa- 
tion externally.  TDY-52B  output  signal  Holdout  triggers  the  Holdin  signal  high 
causing  T4  to  extend  for  7. 0 time  phases.  Holdout  is  generated  only  during  a 
read/write  (R/W)  microcycle. 
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Figure  13.  Computer  Housekeeping 


RAM  EnaMt 


From  rtMt  Flip  Flop 


16.  TDY-52B  Interface  Circuit  to  4096  CMOS 


iming  for  R/W  Cycle 


f 


I 


The  circuits  of  Figures  14  and  15  provide  their  respective  memories  with 
Chip  Enable  (CE)  and  Read/Write  (R/W)  signals.  Because  of  the  large  capacitive 
loading  created  by  the  CMOS  RAM's,  the  TDY-52B  address  lines  take  approxi- 
mately 500  ns  to  reach  a stable  state,  the  CE  signal  is  delayed  for  612.  5 ns  after 
the  start  of  T4.  The  RAM  Enable  line  in  Figures  14  and  16  is  used  in  conjunction 
with  the  ROM  Loader,  where  a logic  zero  enables  access  to  the  memories. 

3.  DISPERSION  CONTRO.  SOFTWARE 

A detailed  description  of  the  Dispersion  Control  Software  is  contained  in  the 
following  sections  and  a complete  listing  in  Appendix  C.  Appendix  B describes  the 
TDY-52B  Assembly  Language  used  in  Appendix  C while  Appendix  E is  a listing  of 
the  terms  used  by  the  flowcharts  and  listings. 

3.1  Auto  Pilct  Difference  Equation 

Eq.  (1)  is  the  autopilot  filter1  chosen  to  control  the  Paiute-Tomahawk  Rocket. 
The  dispersion  control  system  uses  two  of  these  auto  pilots,  that  is,  control  in 
pitch  plane  and  control  in  yaw  plane.  6c  is  a positional  command  in  degrees  to  the 
cannards  in  either  the  pitch  or  yaw  plane  and  6 c is  the  error  signal  generated  in 
the  pitch  or  yaw  planes. 

2 

Eq.  (2)  is  written  by  matching  zeros  and  poles  in  the  z-domain  with  those  of 
Eq.  (1)  in  the  s-domain.  The  constant  is  determined  by  equating  the  final  value 
of  Eq.  (1)  with  Eq.  (2)  in  Eq.  (3).  Expanding  Eq.  (2)  as  shown  in  Eq.  (4),  the 
autopilot  difference  equation,  Eq.  (51  falls  out. 

Since  fixed  point  arithmetic  will  be  used  by  the  software,  Eq.  (5)  must  be 
scaled.  The  maximum  absolute  allowable  error  signal  is  a 22.5°  - .08789°  step 
where  |®c|s  210. 11.  The  scale  factor  256  will  be  used  as  shown  in  Eq.  (6).  The 
factor  . 8 is  absorbed  by  Kg  to  save  a software  multiplication  step  when  converting 
the  autopilot  fixed  point  output  for  use  by  the  D/A  converters. 

Eqs.  (7)  and  (8)  are  the  equations  used  by  the  software. 

(1) 


where  K = 6 and  w = . 8, 

1.  Wilson,  George,  Martin  Marietta  Aerospace. 

2.  Technique  from  Software  Research  Corp. 
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6c(s) 
H is) 


Lj  - - - 


W ^ 


6c(z)  _ K1 
*7*  ~ (z  - e-wl?  * 

where  T = sampling  period. 


(2) 
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f 
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t 
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* 

t 

i 


K 

~2  = 
w 


where  Kj 


5c  = 
Sen  = 


K1  __  s -*  0 

(i  - 7^7  •-*1' 

(3) 

r . -wt  i 2 

= K -1  ~ e 

L W J 

2e"wT  Z'1  6c  - e‘2wT  Z"2  6c  + K1  Z ~2  0 c . 

(4) 

2e"wT  6cn-l  - e'2wT  6cn-2  + Kj  0cn-2  , 

(5) 

= 2 A [— Z5B”]  “ B ["255“]  + 256  [0cn_2]  » 

(6) 

where  K2  = . 8*Kj  * 256  * . 08789°. 


A = e 
B = e 


-2wT 


[0cn-2]  = Integer  quantity  of  .08789°  steps  which  is 
presently  divided  by  256.  Note  that 
[0cn-2]  4 0cn-2. 


K2 

ADP  = 2 * A * ADP1  - B * ADP2  + * THETA2, 


ADY  = 2 * A * ADY1  -B  * ADY2  + ^ * PSIG2  . 


(7) 

(8) 


3.2  Aulo  Pilot  Flow  Chart 

Figure  18  is  a simplified  flow  chart  of  the  Dispersion  Control  Software. 

Execution  begins  with  Block  A (see  Figure  19)  where  test  commands  are  sent 
to  the  fins  and  the  32  word  by  16  bit  RAM  is  initialized.  Upon  completion  of  Block 
A the  TDY-52B  will  wait  for  activation  of  the  Interrupt  Start  Line.  Every  10  ms 
after  activation  of  the  Interrupt  Start,  TN  will  be  incremented  and  compared  against 
TL  (Launch  Time),  TI  (Initiate  Actuator  Time),  T13  (TI  . 100  ms),  TF  (Lock  Fins 
Time),  TF3  (TF  + 100  ms),  and  T2  (2nd  stage  Initiate  Time),  that  is,  variable  TN 
will  serve  as  the  system  clock.  Block  B will  perform  roll  transformation  of 
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coordinates  while  Block  C will  calculate  the  difference  equations.  Note  that  Flags 
F8  and  F12  and  user  jump  input  condition  U3  were  used  to  synchronize  the  TDY-52B 
with  the  AFCRL  EAI  8900  during  ground  testing. 


3.3  Block  A 


ACO-  FF001fi 
CALL  FDELAY  (ACO) 

aco-cooo16 

CALL  FDELAY  (ACO) 
ACO  - 400016 
CALL  FDELAY  (ACO) 
ACO  « 7F0016 
CALL  FDELAY  (ACO) 
TN  - 000016 
ADPH  - 00001g 

adpl-oooo16 

ADPH1  - 000016 
ADPL1  « 000016 
ADPH2  - 000016 
ADPL2  - 000016 
THETA -000016 
THE7A1  - 000016 
THETA2  - 000016 
ADYH  - 000016 
ADYL  - 000016 
ADYH1  - 000016 
ADYL1  “ OOOO-jg 
ADYH2“  000016 
ADYL2  - 000016 

psig-oooo16 

PSIG1  -000016 
PSIG2  • 0000 16 
SEGADD  - 005B16 
REFPH-3EA916 
REFPL-C1A616 

pout*oooo16 

yout-oooo16 

SET  INTEN 
COUT-550016 


Commend 


+10°  Fin  Command 
for  5 See 

+5°  Fin  command 
for  5 hc 

— 5°  Fin  command 
for  5 sec 

—10°  Fin  command 
for  5 Sec 


^ Zero  Fin  Command 

Enable  TDY-S2B  internal  Interrupt 
Output  initiation  complete 
signal  to  dock  latch 


Figure  19.  Block  A 


> Ml  . 4 


5*£ 


mimr* 

f 


3.4  Clock  B 

Block  B calculates  the  effect  of  Gyro  roll  position  phi,  <f> , on  the  pitch  and  yaw 
commands  (see  Figure  20). 

Gyro  roll  position  phi  is  loaded  in  ACO  using  the  format  of  Figure  21.  ACO  is 
right  justified  by  shifting  ACO  5 times.  AC2  is  equated  to  ACO  and  shifted  twice  to 
the  right.  The  value  in  AC2  will  be  used  as  an  address  to  select  the  correct  | sin0  | 
and  | cos  <j>  | from  Figure  22  while  bits  of  0 and  1 of  ACO  determine  the  correct 
quadrant.  The  first  If  statement  of  Block  B determines  which  of  two  pairs  of  quad- 
rants, 1&3  or  2&4,  is  phi  presently  located.  If  phi  is  located  in  quadrants  1&3, 

AC2  is  the  address  of  |sin$|  while  0020jg  - AC2  is  the  address  of  |cos  $|.  If  phi 
is  located  in  quadrants  2&4.  0040jg  - AC2  is  the  address  of  |sin  <j>  | while  AC2 
0020jg  is  the  address  of  |cos  0|  . The  last  two  If  statements  of  Block  B determine 
the  signs  of  | sin  0 | and  |cos0|.  Finally  the  roll  transformation  equations  are 
calculated  and  pitch  & yaw  commands  sent. 

3.5  Block  C 

Block  C calculates  the  pitch  & yaw  error  signals  and  uses  subroutine  CALC 
(AC3)  to  calculate  the  pitch  & yaw  difference  equations.  Figure  23  is  a flow  chart 
of  Block  C. 

Gyro  pitch  9 and  yaw,  ij/^,  position  is  placed  in  ACO  using  the  format  of  Fig- 
ure 24.  Notice  that  this  format  has  a scale  iactor  of  512  instead  of  256  which  is 
used  by  the  Auto  pilot  difference  equations.  Before  subroutine  CALC  (AC3)  is 
called  the  pitch  & yaw  error  signals  are  multiplied  by  2. 

Pitch  & yaw  error  signals  are  calculated  by  subtracting  the  gyro  input  position 
from  the  desired  reference  position.  Gravity  turn  affects  the  pitch  reference. 
Figure  25,  while  the  yaw  reference  is  a constant  4000jg.  The  pitch  reference  is 
calculated  by  successive  summations  rather  than  time  consuming  multiplications 
as  shown  in  Eqs.  (9)  and  (10). 

Pitch  Ref  = at  + b (9) 


where  a = slope 

t - time 
b = intercept. 


Pitch  Ref  = REFPN  + Z ATNH 


(10) 


where  REFPN  = 

4n  = 
A NTH  = 

a = 
n 

T = 


time  line  segment  n.  Figure  25,  begins  n=  1.  2,  or  3 

a * T 
n 

slope  of  line  segment  n 
10  ms  sampling  rate 
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Commtm 


Figure  20.  Block  B 
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14  13  12  11  10  9 8 7 6 5 4 3 2 1 0 


0 0 


. , fc  % 5 # 

8 1?  si  P 3 3 8 


0 0 0 0 0 


Gyro  Obit  wilghti 


Figure  21.  Input  Format  of  Gyro  <j> 


Quadrant  1 & 3 


I Sin  #1  ICojOI 


Sin  0°.  Sin  160°  Coi  90°,  Coi  270° 


Quadrant  2 It  4 


ISinOl  |Co>g| 


Sin  180°,  Sin  360°  Cot  90°.  Coi  270° 

t I 


Magnituda 


0 C 8 B 

1 2 C 8 
1 8 F 8 

1 F 1 9 

2 5 2 8 
2 B 1 F 

2 ii  F B 

3 6 B A 

3 C 5 6 

4 1 C E 
4 7 1 C 


Sin  45°,  Sin  225°  Co«45°,  Coj  225°  Sin  135°,  Sin  315°  Coi  135°  Coi  315°  5 A 8 2 


6 6 C F 
6 
6 


7 3 B 5 
7 6 4 1 
7 8 8 4 


Sin  90°,  Sin  270s  Coi  0°,  Coi  180°  Sin  90°,  Sin  270°  Coi  ISO0,  Coi  360° 


Figure  22.  Absolute  Value  of  Sin  0 and  Cos  <j>  vs  AC2 
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AC3  - 0000. 


Commtnti 


AC2  - AC2*000516 

SE6ADD  - AC2 

ACO  - DATA  (2+0001 -6) 

REFPH  - ACO 

ACO  - DATA  (2  + 0002>g) 

P'-FPL-  ACO 


I 


I 


I 
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Sat  F11 

aco-i|»b 

Puli*  F11 
PSIG  - ACO 
S«l  F11 
ACO*  0 
Puli*  fA 
THETA*  ACO 
AC2*  SEGADD 
ACO-TGX 

ACO-  ACO-  TN 


Figure  23.  Block  C 


Not  Ui*d 

Input  Yaw  Gyro  Poiition 
Not  Ui*d 

Input  Pitch  Gyro  poiition 
Not  U»ed 

Not  U>*d 


Tim*  to  chin)*  Pitch  r*f 
ilop*,  where  X * 1, 2,  or  3 


Pitch  error  lignal 


Double  Precilion  Add 


Cilculit*  Pitch  differanca  aquation 
Yaw  *rror  lignal 


Calcultt*  Yaw  diffaranc*  aquation 


ACO  - REFPH 
ACO- ACO -THETA 
ACO- 2*  ACO 
THETA -ACO 
ACO  REFPH 
AC1  - REFPL 
(ACO+ACIl  - [AC0+AC1) 
+IAXTH+AXTL) 
REFPH -ACO 
REFPL -AC1 
AC3  - 000916 

Call  CALC  (AC3) 

ACO  - YREPH 
ACO-  ACO-PSIG 
ACO  - 2* ACO 
PSIG  - ACO 
AC3-0012^ 

Call  CALC  (AC3) 

Puli*  FI  2 


t 

I 


3i 


i 


Gyro  Pitch  0Q  (deg) 


ACOBITS 

A, 


IS  14  13  12  11  10  9 8 7 6 5 •*  3 2 t 0 


0 

Si 


Figure  24.  Input  Format  of  Gyro  9 g and  \f/g 


S 1 1 i | £ 1 * 

cC  2 ^ • • 


Gyro  9g  or  i/>g  bit  weight! 


Figure  25.  Fitch  Gravity  Turn  - Paiute  Tomahawk 


3.6  Subroutines 

3.6.1  SUBROUTINE  MUL  (ACO,  AC1) 

Subroutine  MUL  (ACO,  AC1)  calculates  one-half  the  signed  product  of  ACO  and 
AC1.  The  32  bit  result  is  placed  in  ACO  and  AC1  with  the  Most  Significant  Part, 
MSP,  in  ACO  (see  Figure  26). 


32 


Comm  an  tt 

Accumulctor  exchange 


32  Ut  remit  combined  in  ACO 
and  AC1 


NOTE:  Only  poaitn* vJ'lM 
may  ba  multiplied 

Max  Execution  time  260.05/ttac 


Figure  26.  Subroutine  MUL  (ACO,  AC1) 


3.6.2  SUBROUTINE  AOUT  (ACO,  ACI) 

Subroutine  AOUT  (ACO,  ACI)  wil'i  convert  the  fin  command  in  ACO  to  n atch 
the  format  of  the  D/A  converter  (see  Figure  27). 

The  first  IF  statement  tests  the  sign  bit  of  ACO  and  sets  AC3  accordingly.  A 
test  is  then  made  of  the  fin  command  magnitude  to  determine  if  it  exceeds  the  10® 
maximum.  If  greater  than  10®,  ACO  is  set  to  10®  and  if  less  ACO  is  multiplied  by 


±. 
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128  removing  in  effect  the  scale  factor  used  during  its  calculation.  Remember  that 
the  factor  . 8 was  buried  in  K2  of  the  difference  equation,  Eq.  (6),  so  that  only  a 7 
bit  left  shift  is  required  at  this  point  saving  valuable  time.  The  final  IF  statement 
determines  the  correct  sign  bit  for  ACO. 


ACO  >0000 


Comments 


ACS  -0000, 


(AC0+AC1)  — (AC0+AC1) 
AC3  - 0001.- 


AC3  • Sign  bit  of  fin  command 


ACQ>0OFF 


Tait  for  maximum  fin  command 


AC0-7F00, 


ACO  - 128  • ACO 


Shift  ACO  left  7 tim.t 


ACSfOOOl 


Test  for  sign 


ACO*ACO"OR"  8000,0 


Sat  bit  15  for  a pod  tire  command 


Max  Execution  Tima  134.82  /usee 


Figure  27.  Subroutine  AOUT  (ACO,  AC1) 


3.6.3  Subroutine  CALC  (AC3) 

Subroutine  CALC  (AC3)  calculates  the  Auto  Pilot  Difference  Equation,  (see  Fig 
ure  28).  AC3  is  used  by  the  main  program  to  tell  the  subroutine  if  the  pitch  or  yaw 
difference  equation  is  to  be  calculated. 


Comment! 


ACO  - DATA  (34000e1gi 
AC1  - K2 

Call  MULtACO.  AC1) 

AC2  - 0000,, 


ACO  “ THETA2  or  PSIG2 


AC2-FF80, 


-£V"£co>oooo, 


Stack  1 - AC3 
SET  FlagSEL 
AC3  - 0008,, 


No.  of  rifht  rotation! 


Divide  (AC0+AC1) 
by  256 


Stack  2 - AC2 
Flag  > Stack  2 
AC0-AC0/2 
AC1  - AC  1/2 
AC3- AC3- 0001, 


Link  bit  L - 1 for  AC0<000016 
Rotate  ritfit,  L+bit  15  & bit  0+L 
Rotate  right,  L+bit  15  8i  bit  0+  L 


•0VC3  - 0000, 


AC3  - Stack  1 
Stack  1 - ACO 
Stack  2- AC  1 

aco*data(3  + ooo«16i 
AC1-DATA(3  + 000516I 


Sara  above  remit 


AC0-ADPH2  or  ADYH2 
AC1  » ADPL2  or  ADYL2 


( AC0+AC1  ] » -lACO+ACI] 
Call  MPYB(ACO.ACI) 
(AC0+AC1)  “ -[AC0+AC1I 


aco>oooo16 


Call  MPYBIAC0.AC1) 


1/2  • B • ADP2  or 
1/2  * B • ADY2 
See  Eqt.  (7)  and  (8) 


Figure  28.  Subroutine  CALC  (AC3) 
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[AC0+AC1 1 --(AC0+AC1] 
Call  V.PYA(AC0,AC1) 
[AC0+AC1]  - ••IAC0+AC11 


SCP2  ■ ACO 
SCP3  - AC1 
AC1  - Stack  2 
ACO  - o'taek  1 
[AC0+AC11  - [ACO+AC1] 
[SCP2+SCP3] 

Stack  1 - ACO 
Suck  2 “ AC1 
ACO  - DATA(3+000216) 

AC1  - DATA(3+000316) 


J*2-Saco>oooo. 


Call  MYPA(ACO.ACI) 


- ^ -1/2* 


Commenti 


B*ADP2  + 1/512*THETA2*K2 


-1/2*B*ADY2  + 1/512*  PSIG2*K2 

ACO  - ADPH1  or  ADYH1 
AC1 » ADPL1  or  ADYL1 


1/2*A*ADP1  or 
1/2*A*ADY1 


Sat  FlagSEL 

[AC0+AC1]  »2*[AC0+AC1) 

SCP2-AC0 

SCP3-AC1 

ACI-Stack  2 

ACO-Stack  1 

[AC0+AC1J»[AC0+AC1)  + 
ISCP2+SCP3) 
AC2-DATA!3+000716) 

DATA(34000816)-AC2 
AC2-DATA(3+000616) 
DATA(3+00071g)*AC2 
AC2»DATA(3-KW0316) 
DATA(3+000516)  - AC2 
AC2-DATA(34000216I 
DATA(3+000416I-AC2 
DATAI3)  - ACO 
DATA(3+000116)  - AC1 
Sit  Flag  Sal 

(ACO+ACIl  *2*[AC0+AC1) 
DATA(3-tO00216)  - ACO 
DATA(3*/X)03jg)  - AC1 
Return 


•ADP1  or  A*ADY1 


A*ADP1  - 1/2*B*ADP2+1/512*THETA2*K2  or 

A*ADY1-1/2*B*ADY2+1/512*PSIG2*K2 

THETA1  or  PSIG1 

THETA2  or  PSIG2 

THETA  oi  PSIG 

THETA1  or  PSIG1 

ADPi.1  or  ADYL1 

ADPL2  or  ADYL2 

ADPH1  or  ADYH1 

ADPH2  or  ADYH2 

ADPH  orADYH 
ADPL  orADYL 

ADP  or  ADY 
ADPH1  or  ADYH1 
ADPL1  or  ADYL1 

Max  Execution  Time  2822.7  fx  aac 


Figure  28.  Subroutine  CALC  (AC3)  (Cont) 
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3.6.4  SUBROUTINE  MPYA  (ACO,  ACl) 


? 


f 

t- 


ii 


F 

If 

! 

I 


i 

J* 


ft 

4 


is 


Subroutine  MPYA  (ACO.  AC1)  calculates  one-half  the  product  of  the  32  bit  fixed 
point  number  formed  by  ACO  and  AC1  and  the  32  bit  fixed  point  number  formed  by 
A and  AL.  The  32  bit  result  is  placed  in  ACO  and  AC1.  MSP  is  in  ACO  (see  Fig- 
ure 29). 

3.6.5  SUBROUTINE  MPYB  (ACO,  AC1) 

Same  as  MPYA  except  the  32  bit  fixed  point  number  formed  by  B and  BL  is 
used. 


Stackl  - ACO 
Stack2  - AC1 
AC1-A 
SCP  - ACO 

[AC0+AC1]  -1/2*AC1*SCP 

SCP2-AC0 

SCP3-AC1 

ACO-Stack  2 

PuIm  Fits  SEL 

ACO-  1/2  ACO 

AC1-A 

SCP- ACO 

[AC0+AC1]  -1/2*AC1*SCP 
Set  Flag  SEL 

[AC0+AC1  ] -2*  I AC0+AC1  ] 
AC1  - ACO 
ACO  - 000016 
[ AC0+AC1  ] « [ AC0+AC1  ] + 
(SCP2  + SCP3] 

SCP2  - ACO 
SCP3  - AC1 
ACO- AL 
Pulie  Flag  SEL 
ACO  - 1/2  ACO 
AC1  - Stack  1 


SCP  - ACO 

|AC0+AC11«1/2*AC1*SCP 
Sat  Flag  SEL 

|AC0+ACt!«2*[AC0+AC1J 

AC1-AC0 

ACO-OOOO.g 

(AC0+AC1 ) - (ACO+ACI  ] + 
(SCP2+SCP3) 

Return 


Comment! 

Store  Molt  Significant  Part  (MSP) 
Store  Leatt  Significant  Part  (LSP) 


| Store  1/2  MSP*A 
ACO  - LSP 

| Shift  ACO  right,  bit  IS- 0 

1/4  LSP*A 
| 1/2  LSP* A 


| Store  1/2MSP*A+1/2  LSP*A 

| ACO- 1/2 AL 
AC1  - MSP 

1/4  MSP  * AL 
| 1/2  MSP  * AL 

1 1/2MSP*A+1/2LSP*A+1/2MSP*AL 


Max  Execution  Time  815.5/xiec 


Figure  29.  Subroutine  MPYA  (ACO,  AC1) 
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3.6.6  SUBROUTINE  FDELAY  (ACO) 

Subroutine  FDELAY  (ACO)  will  provide  an  approximate  5 sec  command  to  both 
the  pitch  and  yaw  fins.  ACO  is  the  signed  magnitude  of  the  command  and  must  be 
in  the  correct  format  for  the  D/A  converters  (see  Figure  30). 


Figure  30.  Subroutine  FDELAY 
(ACO) 


4.  ROM  LOADER 

The  ROM  Loader  is  designed  to  edit  or  debug  a program  stored  in  the  CMOS 
RAM.  An  ASR-33  and  Figures  33  and  34  comprise  the  ROM  Loaders  hardware. 

There  are  three  functions  which  the  ROM  Loader  performs;  List  memory  contents. 
Read  a paper  tape  into  the  memory  and  Write  into  the  memory  from  the  teletype  keyboard. 
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4.1  Operation 

To  use  the  ROM  Loader  switch  SI  of  Figure  34  must  be  in  position  one  before 
starting  the  TDY-52B.  When  the  TDY-52B  is  started  the  teletype  will  respond  with 
the  message  "COMMAND:"  and  wait  for  one  of  three  commands  typed  on  the  key- 
board L,  RorW: 

L,  AAAA,  BBBB*  typed  on  the  teletype  will  produce  a listing  of  the  memory 
contents  at  the  four  digit  hexadecimal  location  AAAA  through  location  BBBB.  See 
Figure  31  for  sample  output. 

R typed  on  the  teletype  will  start  the  paper  tape  reader.  Figure  32  is  the 
required  papertape  format. 


COMMANO:  L.  0020, 0024 
LOC  DATA 


Figure  31.  Sample  ROM  Loader  Listing 


■ SPROCKET 


00110 

000 

00110 

000 

00110 

010 

00110 

000 

DDDDD 

DOD 

DDDDD 

ODD 

DDDDD 

DOD 

DODDD 

DOD 

DODDD  DOD 
00100  001 


Starting  addrtti  of  data  in 
ASCII  coded  hexadecimal 
for  tfiii  Mam  pit  0020 .jg 


DATA  in  ASCII  coded 
hexadecimal,  that  it,  for  each 
mamory  location  thara  will  ba 
four  lines  of  punch  ad  tap*. 
MSD  ii  firit.  The  ROM  Loader 
increments  the  narting  add  ran 
for  the  next  block  of  date. 
Note  that  all  characters  not  In 
Figure  38  will  ba  ignored  bv 
Subroutine  RECV  (AC0,  AC1I 


Exclamation  mark  terminates  reading 
of  the  paper  tape. 


Figure  32.  ROM  Loader  Paper  Tape  Format 
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W,  AAAA,  BBBB*  typed  on  the  teletype  will  write  the  four  digit  hexadecimal 
value  BBBB  in  memory  location  AAAA. 

After  completing  each  command  the  message  "COMMAND:"  is  once  again  sent 
by  the  ROM  Loader  indicating  it  is  ready  for  a new  command.  *Note  commas  in 
the  above  commands  are  not  necessary.  Figure  35  is  the  ROM  Loader  Flow  Chart. 

4.2  ROM  Loader  Electronic* 

The  circuit  diagrams  in  Figures  33  and  34  comprise  the  ROM  Loader  Elec- 
tro <•  s.  The  two  256  word  by  8 bit  PROM's  contain  the  ROM  Loader  software. 
Switch  SI  of  Figure  34  determines  which  memory  the  TDY-52B  will  fetch  its  first 
instruction  from,  that  is,  position  1 will  enable  the  ROM  Loader  while  position  2 
will  enable  the  Dispersion  Control  memory.  The  RAM  Enable  of  Figure  34  is 
connected  as  shown  in  Figure  14,  or  when  using  the  4096  RAM  in  Figure  16.  Ad- 
dress lines  AD00  through  AD07  and  AD15  of  the  TDY-52B  are  used  to  address  the 
ROM  Loader  memory  (see  Figure  34).  Isolation  between  the  ROM  Loader  Memory 
and  the  Dispersion  Control  Memory  is  accomplished  by  means  of  Tri-State  outputs, 
which  must  be  provided  externally  for  the  Intel  PROM's,  that  is,  the  Hex  Tri-State 
Buffers  DM8095.  MD00  through  MD15  are  the  memory  data  input  lines  of  the  TDY- 
52B. 

4.3  Subroutine* 

4.3.  1 SUBROUTINE  RECV  (ACO,  AC1) 

Subroutine  RECV  (ACO,  AC1)  provides  the  necessary  decoding  of  the  8 bit  data 
words  sent  serially  by  the  teletypes  transmitter,  (see  Figure  36).  The  subroutine 
will  return  from  where  it  was  called  with  ACO  containing  the  decoded  teletype  data 
and  AC1  containing  the  position  of  the  teletype  data  in  the  look  up  table.  Figure  38. 

Upon  recognition  of  a teletype  start  bit  a 13.5  ms  delay  is  intiated  to  wait  for 
the  middle  of  the  first  teletype  data  bit,  (see  Figure  37).  After  ACO  has  been 
filled  with  the  first  seven  data  bits  and  the  parity  bit,  bit  8,  ignored,  ACO  is  com- 
pared against  the  look  up  table  in  Figure  38  to  determine  what  alphanumeric 
character  the  teletype  sent.  If  there  is  no  match  the  subroutine  will  return  to  its 
beginning  to  wait  for  another  teletype  transmission.  If  ACO  contains  the  alpha- 
numeric characters  0-F  it  is  decoded  from  seven  bits  to  four  bits,  that  is,  the 
four  LSB's  of  ACO  will  contain  the  hexadecimal  digits  0-F  with  all  other  bits  zero. 
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mm 


Commaim 

Turn  off  TTY  Reader  Relay 
Send  carriage  return  and 
tin*  faad  to  TTY 

Sand  digits  C & 0 to  TTY 
Sand  digit*  M&M  to  TTY 

Sand  digit*  A & N to  TTY 

Sand  digit  D & Symbol: 
to  TTY 

Wait  for  Command 


Chack  for  lagai  command 
Saa  Figure  38 


Identify  command 
W received 

Wait  for  4 digit  memory  addrat*  in  ACO 
Chack  for  Hexadecimal  digit* 


Sava  memory  addrett 
Wait  for  4 digit  data  in  ACO 
Place  memory  addrett  in  AC3 


Check  for  Hexadecimal  digit! 


Store  ACO  content  at  memory 
addrett  ir  AC3 


Figure  35.  ROM  Loader  Flow  Chart 
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Comments 


} 

} 

} 

} 

} 

} 

} 

} 


AC1  * AC3 
Stack  1 « AC2 
Stack  2 - AC3 
Call  WORDS  (AC1) 
ACO  - A0A01g 
Call  XMIT  (ACO) 
AC3  - Stack  2 
AC1  - DATA  (3) 
Stack  2 - AC3 
Call  WORDS  (AC1) 


ACO  - 8A8D16 
Call  XMIT  (ACO) 
AC3  - Stack  2 
AC2  - Stack  1 


AC3  - AC3  + 000116 
AC2  - AC2  - 0001  ;6 


I . 

Stack  1 - ACO 
Stack  2 ■ AC3 
ACO  ■ 8A8D16 
Call  XMIT  (ACO) 

ACO  ■ CFCC16 
Call  XMIT  (ACO) 

ACO  - AOC316 
Call  XMIT  (ACO! 

ACO  - A0A016 
Call  XMIT  (ACO) 

ACO  - C1C416 
Call  XMIT  (ACO) 

ACO  “ CI0416 
Call  XMIT  (ACO) 

ACO  - 8A8D1fi 
Call  XMIT  (ACO) 

ACO  ■ 8A8D  .jg 
Call  XMIT  (ACO) 

AC3  • Stack  2 
AC2  - Stack  1 
AC1  - AC3 
AC1  - -AC1  +000116 
AC2  - AC2  + AC1 


Stora  final  memory  addons 
Store  initial  memory  address 
Send  carriage  return  and 
line  feed  to  TTY 

Send  digits  L & 0 to  TTY 

Send  digit  C and  a apace 
Command  to  TTY 
Send  two  apace  commends 
to  TTY 

Send  digits  D&A  to  TTY 
Send  digits  T2.A  to  TTY 

Send  carriage  return  and 

line  feed  to  TTY 

Send  carriage  return  and 

line  feed  to  TTY 

AC3  * initial  memory  addreaa 

AC2  * final  memory  addreaa 


AC2  - No.  of  locations  to  be  listed 


Send  memory  addreaa  to  TTY 
Send  two  space  commands 
to  TTY 

AC1  ■ memory  content  at  address 
stored  in  AC3 

Send  memory  address  contents  to  TTY 


Send  carriage  return  and 
line  feed  to  TTY 


Increment  memory  Address 
Decrement  No.  locations  to  be 
listed 


Return  if  list  finished 


Figure  35. 


ROM  Loader  Flow  Chart  (Cont) 
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TTY  Bit  location 
AC2  - TTY  Bit  count 

Wait  for  TTY  Mart  bit 


13.5  ms  delay 


Tast  data  bit 


Logic  1 bit  datactad 

(U3  it  imarta  of  TTY  data  bitt) 


Advance  TTY  bit  location 


9.0  mt  (May 


Dacramant  bit  count 


TTY  data  input  com  pitta 


Figure  36.  Subroutine  RECV  (ACO,  AC1) 
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I Start  I 1 I 2 I 3 I 4 I 5 I 6 I 7 I 8 I 

i r 


Stoo 


LS8 


MSB 


9 mi 


Figure  37.  TTY  Word  Format 


I 

i 


Figure  38.  Subroutine  RECV  (ACO,  AC1) 
Look  Up  Table 


4.3.2  SUBROUTINE  WORDR  (ACO,  AC1) 

Subroutine  WORDR  (ACO,  A Cl)  receives  four  data  words  from  the  teletype  and 
stores  them  as  four  hexadecimal  digits  of  four  bits  each  in  ACO  using  subroutine 
RECV  (ACO,  AC1),  (see  Figure  39  and  Figure  40).  AC1  will  contain  the  position 
in  the  look  up  table.  Figure  38,  of  the  last  data  word  received.  If  the  teletype  sends 
an  I , L,  R or  W the  subroutine  terminates  early. 


DATA(2) 

ASCII 

AC1 

003016 

0 

0014,6 

twatie 

1 

0013,6 

0032,6 

2 

0012,6 

003316 

3 

0011,6 

0034,6 

4 

0010,6 

0035,6 

5 

000F,e 

0036,6 

6 

°0°-16 

0037,6 

7 

000D,6 

0038,6 

8 

000C,6 

0039,6 

9 

OOOB,6 

0041,6 

A 

000A,g 

0042,6 

B 

0009^g 

0043,6 

C 

0008,6 

0044,6 

D 

0007,6 

0045,6 

E 

0006,6 

0046,6 

F 

0005,6 

0021,6 

1 

0004,6 

004C,6 

L 

0003,6 

0052,6 

R 

0002,6 

0057,6 

W 

0001,B 
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ACO  - 000016 
AC2  - 0004 -|6 


AC2  ■ Digit  Count 


Shift  ACO  4 bitt  I»ft 
W»it  for  digit  from  TTY 
Store  received  digit  in  ACO 


Check  for  legel  digit 


Decrement  digit  count 


TTY  tent  four  digits 


Figure  39.  Subroutine  WORDR  (ACO,  AC1) 

Bit  15  14  13  12  11  10  9 8 7 5 5 4 3 2 1 0 

| ^ Platt  No.  1 j | Digit  No.  2 | Digit  No.  3 | Digit  No.  4 

MSD  

Figure  40.  Format  of  ACO,  Subroutine  WORDR  (ACO,  AC1) 


4.  3.  3 SUBROUTINE  XMIT  (ACO) 

Subroutine  XMIT  (ACO)  will  transmit  two  8 bit  data  words  in  ACO  as  two  tele- 
type data  words,  (see  Figures  41  and  42).  If  only  one  data  word  is  to  be  sent  use 
data  word  No.  ) and  set  data  word  No.  2 to  zero  in  Figure  42. 

4.3.4  SUBROUTINE  WORDS  (AC  1) 

Subroutine  WORDS  (AC1)  in  conjunction  with  subroutine  XMIT  (ACO)  will  trans 
mit  to  the  teletype  four  hexadecimal  digits  in  AC1  using  the  format  of  Figure  40. 
Figure  43  is  the  flow  chart  used  by  Subroutine  WORDS  (AC1). 


Bit  15  14  13  12  11  10  9 8 7 6 5 4 3 2 


D»t*  Word  No.  2 


Data  Word  No.  1 


Figure  42.  Format  of  ACO,  Subroutine  XMIT  (ACO) 


Comments 


Digit  count  « 4 


Digit  to  be  sent  occupies 
bits  0-3 

All  bits  zeroed  except 
0-3 

Place  digit  C in  bits 
4-7.  Convert  digit 
to  8 bit  TTY  word 


Check  for  letter  or 
number  in  Figure  38 


Transmit  Digit 


Figure  43.  Subroutine  WORDS  (AC1) 


TDY-52B  Instruction  Set 


Execution  Time 

mnemonic 

INSTRUCTION  NAME 

FUNCTION 

in  Microseconds* 

Format 

10*0  AND  Stott 

10  ** 

LOAD 

l£A)-  (AC-UF  INOltECT  ((EA))-  (*Ct) 

9.1,10.15  IF  Ind* 

2 

SI  ** 

STORE 

(ACNi-fCA),  IF  INOltECT  (AC.)  -((EA)) 

10.15 ^4. 35, IF  Ind. 

2 

101 

LOAD  1YTE 

(t/i  ea)-(aco  less  significant  »yie» 

Right  21.0, left  32.2 

5 

STB 

STORE  IYIE 

(ACO  LESS  SIGNIFICANT  (YIF  -(1/2  EA) 
O-(SEL) 

Right  29.05,  Left 
38.85 

5 

ARITHMETIC 

AOO 

ADD 

(ACl)  ♦ (EA)-  (ACr)  OV,  CY 

9.1 

2 

SUI 

SUBTRACT 

(ACr)  - (EA)  - (ACr)  OV,  CY 

9.1 

2 

MPY 

MULT  If  LY 

(EA)  • (ACl)-j  (ACO,  TACIl)  l O-(SEl) 

151.55  to  173.95 

5 

OIV 

DIVIDE 

{ (ACO),  (ACI)l-(EA)-IACO)  QUOTIENT 
J-(SEl)  OV,  l '‘(ACl)  lEMAINOEt 

178.15  to  225.75 

5 

OAOD 

OOUBIE  PRECISION  ADD 

| (ACO),  (ACJ)|*  l(EA),  (EA*o]-|'ACO),  (ACl)] 
O-(SEL)  OV,  CY  1 1 ' 1 

21.0 

5 

DSUI 

DOUBLE  PRECISION  SUBT  JLCT 

l(ACO),  <ACt)|  - f(EA),  (EA  * l)l-|lACO),  (ACI)l 

21.0 

5 

0 -(SEt)  OV,  CY  ' 

LOGICAL 

AND 

AND 

(ROD  -AND-(EA)-(ROD 

9.1 

3 

OK 

OR 

(ROD  *OR-(EA)-(R0D 

9.1 

3 

i5ir 

12.95  If  Skip  lb.  35 

bB 

ISZ 

INCREMENT  and  skip  ip  zero 

(EA)  ♦ 1 - (EA) 

IF  (EA)  -0,  (PC)  ♦ 1 - (PC) 

dsz 

CECREMENT  AND  SKIP  IP  ZERO 

(EA)  - 1-iCA) 

IP  (EA)  • 0,  (PC)  ♦ 1 • (PC) 

lb. 35  If  Skip  15.75 

bB 

SKG 

SKIP  IP  GREATER  THAN 

IF  (ACO  -(EA),  (PC)  ♦ 1 -(PC) 

13.3  to  16.1 

2 

SKNE 

SKIP  If  NOT  EQUAL 

IF  (AC.)  i (EA),  (PCI  • ) - (PC) 

10.5 

2 

SKAZ 

SKIP  If  -ANO-  IS  ZERO 

IF  itOI)  'AND"  'EA)  .0,  ‘PC)  • l-(PC) 

10.5  If  Skip  11.9 

3 

SKSTF 

SKIP  If  STATUS  FLAG  ItUE 

IP  (STATUS  FLAG  N)  • 1,  (PC)  ♦ l-(PC) 
0 (SEL) 

27.65  to  55.65 

9 

SKH! 

SKIP  If  IIT  TRUE 

IF  (ACO  BIT  N)  • 1,  (PC)  * 1 ‘(PC) 
0 (SEL) 

27.65  to  55.65 

9 

Single  III 

2b. 85  to  51. b5 

SEISI 

SET  STATUS  BIT 

I—  (STATUS  FLAG  N) 

9 

cuts? 

CLEAR  STATUS  BIT 

0- (STATUS  FLAG  N) 

2b. 85  to  51. b5 

9 

St  I III 

SET  BIT 

1~(AC0  BIT  N) 

22.05  to  b8. 65 

9 

CLK5IT 

CLEAR  BIT 

0- (ACO  BIT  N) 

22.05  to  b8.65 

9 

CMfllT 

TRANSFER 

COMPLEMENT  BIT 

(ACO  BIT  N)- (ACO  BIT  N) 

22.05  to  b8.65 

9 

bA 

JMt  ** 

JUMP 

£A-(PC) , IF  INOltECT  (EA)-  (ACr) 

5.25  If  Ind.  9.1 

J$*  irk 

JUMP  TO  SUBROUTINE 

(PC)  -(STK) 

EA  -(PC),  IP  INOltECT  'EA)  — (PC) 

6.65,  If  Ind.  10.5 
6.65,  IF  Branch  8. 05 

bA 

•OC 

BRANCH  ON  CONDITION 

IP  CONDITION  CC  IS  TRUE, 

1 

(pci  • o -(PC) 

8.05 

8 

IT, 

RETURN  PROM  INTERRUPT 

(STK)  rC-(PC) 

1 -(l£F) 

6.65 

8 

ITS 

RETURN  PROM  SUBROUTINE 

(STK)  ♦ C - (PC) 

JSKI 

JUMP  TO  SUBROUTINE  IMPLIED 

(PC) -(STK) 

6.65 

8 

Ffeo|6  • c - (PC) 

•Timet  are  for  T4  Extended  6 Time  Phases 
••For  Ind.  add  ID  to  mnemonic,  that  It,  LDID 


Preceding  page  blank 
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TDY-52B  Instruction  Set  (Cont) 


Execution  Time 

MNEMONIC 

INSTRUCTION  NAME 

FUNCTION 

In  Microseconds* 

Format 

TRANSFER  (coni) 

JMPP 

JUMP  THROUGH  POINTER 

(I00|4  ^J)-(PC) 

12.95 

9 

JS*F 

JMf  10  SUIROUTINf  THRU  POINTER 

'pci-isiK)  <ioo)4  *q-/pc) 

1*4.35 

8 

iNimnupT 

JINT 

JUMP  INDIRECT  TO  LEVEL  0 

(PC)-(STK),  O-(ltf) 
(IMU.N)-PC 

11.9 

9 

1SCAN 

INTERRUPT  SCAN 

1/2  (ACI)-(ACl)  UNTIL  1 SHIFTED  OUT 

13.65  to  113.05 

9 

(AC2t  ♦ NUMBER  OF  SHIFIS-(AC2) 

SHIFT 

ROl 

rotate  left 

2 (ACr)  — (ACr) 

If  5ft  ■ 0,  (tit  IS)— 'BIT  0) 

If  Sfl  - 1,  (MI  IS)— (l).  »l)— C8IT  0) 

D TIME  S 

6.65  + 1).2D 

1*B 

ROR 

ROTATE  RIGHT 

1/2  (AC/)  - (ACr) 

if  Sfi  ■ o,  (in  o)— (tir  ij) 

If  Sfl  • 1,  (BIT  0}— ft),  /L)— (BIT  15) 

0 TIMES 

6.65  + U.2D 

1)B 

SHI 

SHIFT  LEFT 

2 (ACr)  - (ACr) 
o— (Bit  0) 

IF  set  - 1,  (BIT  15)- (l) 

0 TIMES 

6.65  + 4. 2D 

Ub 

SMI 

SHIFT  RIGHT 

l/2(ACf)-(ACf) 

If  Sfl  »0,  0— (BIT  15) 

If  Sfl  • 1,  (l)-(eil  15),  0— ft) 

0 TIMES 

6.65  + U.2D 

ub 

STACK 

PUSH 

PUSH  ONTO  STACK 

(AC.)  — (STK) 

5.25 

UB 

PUll 

PUll  FROM  STACK 

* (5  IK)—  (ACr) 

5.25 

Ub 

PUSHf 

PUSH  STATUS  FLAGS 
ONTO  StArK 

(Sf)— (STK) 

6.65 

8 

PUHF 

PUll  STATUS  FLAGS  FROM 
STACK  INTO  FLAG  REGISTER 

(STK)  — (ACr) 

8.05 

8 

XCHIS 

exchange  register 

(AC,)  —(STK) 

8.05 

Ub 

AND  STACK 

(STK)—  (ACr) 

IMMFOIATG 

U 

LOAD  IMMEOIATC 

O-(ACr) 

5.25 

Ub 

AlSZ 

ADD  IMMEOIATE  AND 
SKIP  IF  ZERO 

(ACr)  .0-(*Cr)  OV,  CY 
If  (ACr)  ‘0,  tfC)  » 1 — (PC) 

6. 65, IF  Skip  8.05 

Ub 

CAI 

COMPLEMENT  ANO  ADD 

immediate 

~ (ACr)  • D — (ACr) 

5.25 

Ub 

n nr,  if,  ter 

RADD 

REGISTER  AOD 

(SR)  • (OR)— (C*)  CY 

5.25 

6 

IXCH 

REGISTER  EXCHANGE 

(SR)- (OR),  (0T-(i«) 

12.25 

6 

Rupy 

REGISTER  COPY 

(SR) -(OR) 

10.5 

6 

IXOI 

REGISTER  EXCLUSIVE  OR 

(SR)O(OR)  -(OR) 

9-1*5 

6 

RAND 

REGISTER  AND 

(SR)'AN0"(0R)-(0R) 

9.1*5 

6 

INPUT/OUTPUT 

RIN 

REC'STER  INPUT 

(AC3)  *C-(IO  AOOR) 
(IO  OAT  A)  -(ACO) 

10.85 

8 

ROUT 

REGISTER  OUTPUT 

(AC3)  • C -(IOAUOR) 
(ACO) -(10  OAT  A) 

10.85 

8 

SFLG 

SET  FLAG 

C— flOADOR),  1-  (CONTROL  ftAG  K) 

6.65 

7 

me 

PULSE  FLAG 

C-OOAOOR),  I— (CONTROL  FtAGfC) 

6.65 

7 

HAcT 

HALT 

PROCfSSOR  HALTS 

8 

*Tlm«i  irt  For  T4  Extimfed  8 Tim«  Ph«t«i 
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Appendix  B 

TDY-52B  Assembly  Language 


Each  source  statement  of  Appendices  C and  D contains  an  instruction  found  in 
Appendix  A or  a 4 digit  hexadecimal  data  word  stored  at  the  indicated  memory 
location.  Figure  B1  is  the  instruction  format  while  Figure  B2  is  the  data  word 
format: 

Instruction  Format 

a)  Optional  address  field  with  not  more  than  ten  alphanumeric 
characters. 

b)  Instruction  mnemonic  field.  See  Appendix  A. 

c)  Working  accumulator  field  or  code  field  with  the  following  formats 
referenced  to  Appendix  A.  Formats  4A,  4B  and  5:  Working 

accumulator  having  one  of  four  values 
(0, 1,  2, 3)  except  where  restricted  by 
Appendix  A in  the  column  labeled  function. 
Format  6:  Source  accumulator  followed 
by  destination  accumulator  in  parenthesis. 
Each  having  one  of  four  values  (0, 1,  2, 3). 
Formats  1,7,  and  9:  Condition  code 
field  containing  one  of  sixteen  values 
(0, 1 15). 

Formats  2,  3 and  8:  Field  not  used. 


Preceding  page  blank 
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d)  Displacement  field  with  either  ten  or  less  alphanumeric  characters  refer- 
ring to  an  address  field,  or  a 4 digit  hexadecimal  value  whose  least  significant 
digits  are  used  to  determine  the  least  significant  bits  of  the  instructions  object 
code.  The  addressing  mode  is  placed  in  parenthesis  at  the  end  of  the  displacement 
field  for  those  instructions  using  formats  2,  3, 4A  and  5.  The  addressing  mode  is 
one  of  four  values  (0, 1,  2,  3). 

0 - direct 

1 - relative  to  Program  Counter 

2 - relative  to  Accumulator  2 

3 - relative  to  Accumulator  3 
Data  Format 

a)  Optional  address  field  with  not  more  than  ten  alphanumeric  characters. 

b)  Data  field  having  a 4 digit  hexadecimal  value. 


ADDRESS 

INSTRUCTION 

t j 

REG  OR  CODE 

1 

DISPLACEMENT 

Figure  Bl.  Assembly  Language  Instruction  Format 


ADDRESS 


I DC„ 


DATA 


Figure  B2.  Assembly  Language 
Data  Format 
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5 

l 


*r. : . :i ^zirijxiri  i 


AUTOPILOT  L/ STING 


i 

i 


LOC 

OBJECT  CODE 

STMT 

SOURCE  STATEMENTS 

0000 

0000 

1 

, DC,, 0000, 

0001 

0000 

2 

INT2.DC, ,0000, 

0002 

0000 

3 

TN, DC,, 0000, 

0003 

0000 

1. 

SCP.DC, ,0000, 

000*4 

0000 

5 

COSPH.DC, ,0000, 

0005 

0000 

6 

SINPH,DC, ,0000, 

0006 

0000 

7 

SCP2,DC, ,0000, 

0007 

0000 

8 

SCP3,DC, ,0000, 

0008 

0000 

9 

SCPll , DC,  ,0000, 

0009 

0000 

10 

ADPH,DC, ,0000, 

OOOA 

0000 

11 

ADPL.DC, ,0000, 

OOOB 

0000 

12 

ADPHl.DC, ,0000, 

OOOC 

0000 

13 

ADPI.l  ,i)C , ,0000 , 

OOOD 

0000 

1*4 

ADPH2,DC,,0000, 

OOOC 

0000 

15 

ADPL2,DC,,0000, 

OOOF 

0000 

16 

THETA , DC , , 0000 , 

0010 

0000 

17 

THETA1 ,DC , ,0000 , 

0011 

0000 

18 

THETA2 , DC , , 0000 , 

0012 

0000 

19 

ADYH.DC, ,0000, 

0013 

0000 

20 

ADYL,DC, ,0000, 

OOlU 

0000 

21 

ADY1I1 , DC,  ,0000, 

0015 

0000 

22 

ADYL1 ,DC, ,0000, 

0016 

0000 

23 

ADYII2  ,DC , , 0000 , 

0017 

0000 

2*4 

ADYL2,DC,,0000, 

0018 

0000 

25 

PSIGjDC, ,0000, 

0019 

0000 

26 

PSIG1,DC, ,0000, 

OOlA 

0000 

27 

PSIG2.DC,  ,0000, 

001B 

0000 

28 

SEG ADD, DC,, 0000, 

001C 

0000 

29 

REFPH  ,DC , ,0000 , 

0010 

0000 

30 

REFPL.DC , ,0000 , 

UOir. 

0000 

31 

, DC,, 0000, 

001F 

0000 

32 

, DC, ,0000, 

0020 

>*700 

33 

,PU1.L,3, , 

0021 

LC10 

3'* 

, LI, 0,0010, 

0022 

C002 

35 

,ADD,0,TN(0), 

0023 

A002 

36 

,ST,0,TN(0), 

002*1 

0800 

37 

,SFLG, 0,0000, 

0025 

0900 

38 

,SFLG,3 ,0000, 

0026 

B052 

39 

,ST1D,0,C0UT(0) 

0027 

D04C 

J|0 

,SUB,0,TL(0), 

0028 

1205 

ill 

,BOC,2,5, 

0029 

1E01 

1*2 

2,B0C,ll.  ,1 , 

002A 

2029 

*•3 

,JMP,,2(0), 

002B 

0880 

>il. 

l.PFLG, 0,0000, 

002C 

202D 

1.5 

3,JMP,,>.(0), 

0020 

202C 

1.6 

1.,. IMP,,  3(0), 

002 i 

8002 

1* . 

5,'J),0,TN(0) , 

I 


f 

\ 


Preceding  page  Wank 
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AUTOPILOT  LISTING  (cont’d) 


OBJECT  CODE 

D04D 

1205 

OCOO 

1E01 

2032 

0C80 

202D 

8002 

D04E 

1202 

ODOO 

2031 

0D80 

8002 

D04F 

1B54 

8002 

D050 

120L 

1)COO 

B053 

B051) 

2031 

OEOO 

8002 

D051 

1BE2 

OFOO 

0000 

0000 

1F20 

1FC0 

69  EO 

6A8O 

7C90 

OFFC 

OBFC 

07FC 

0000 

0001 

0020 

7EF9 

7DF6 

0l6l 

3810 

3EA9 

C1A6 


SOURCE  STATE?  1ENTS 

,SUB,0,TI(0) , 
,B0C,2,8, 
9,SFLC,I),0000, 
6,BOC,ll),7, 
,JMP,,6(0), 

7 ,PFLG,I)  ,0000, 
,JMP,,1.(0), 
3,LD,0,TN(0), 
,SUB,0,TI3(0), 
,B0C,2,10, 
,SFLG,5,0000, 
,JMP,,9(0), 
10,PFLG,5,0000, 
,L»,0,TN(0), 
,SU!),0,TF(0), 

, HOC, 11 .TRANS, 
,LD,0,TN(0), 
,SUB,0,TF3C0), 
,B0C,2,ll, 

,1.1, 0,0000, 
,ST1D,0,P0UT(0) 
,STID,0,Y0UT(0) 
,JHP,  ,9(0) , 
11,SFLG,6,0000, 
,LD,0,TN(0), 
,SUB,0,T2(0) , 
,B0C,11 ,3, 
,»FLG,7,0000, 
.HALT,,, 

TL, DC,, 0000, 

TI  ,DC, ,IF20, 
TI3,I)C,,IFC0, 
TF,DC,,69E0, 
TF3,DC, ,6a80, 
T2,DC,,7C90, 
COUT.DC, ,OFFC, 

POUT, DC,, OBFC, 
VOUT,DC,,07KC, 

sen,  dc,,  0000, 

SCF’5,DC,  ,0001 , 

THE?, DC,, 0020, 

A,  DC, ,7EF9, 

B, DC,  ,7DF6, 

K2 ,DC , ,01 6 l , 

TGI, DC,, 3810, 
RKFPLH.DC,, 3EA0, 
REFP1L,DC,,C1A6, 


AUTOPILOT  LISTING  (cont'd) 


LOC  OBJECT  CODE 


STMT  SOURCE  STATEMENTS 


005E 
005F 
0060 
0061 
0062 

0063 

0064 

0065 

0066 

0067 

0068 

0069 
006A 
oo6b 
006C 
006D 
006E 
106F 

0070 

0071 

0072 

0073 

0074 

0075 

0076 

0077 

0078 

0079 
007 A 
007B 
007C 
007D 
007E 
007F 

! 0080 

0081 

0082 

0083 

0084 

0085 

0086 

0087 

0088 
0089 
008A 
008B 
008C 
008D 
008 E 


FFFF 

95 

9DC9 

96 

50F0 

97 

3EI0 

98 

d6cf 

99 

FFFF 

100 

8B14 

101 

7FFF 

102 

3D5A 

.103 

CB6F 

104 

FFFF 

105 

6F04 

1C6 

7FFF 

107 

0000 

1C8 

0000 

109 

0000 

110 

0000 

111 

0000 

11? 

0647 

113 

0C8B 

114 

12C8 

115 

18F8 

116 

1F19 

117 

2528 

118 

2B1F 

119 

30FB 

1?0 

36ba 

121 

3C56 

122 

4 ICE 

123 

471C 

124 

4C3F 

125 

5133 

126 

55F5 

127 

5A82 

128 

5ED7 

129 

62F2 

130 

66cf 

131 

6a6d 

132 

6dca 

133 

70E2 

134 

73B5 

135 

"6<tl 

136 

7884 

137 

7 A i'D 

138 

7C29 

139 

7D8A 

l4o 

7K9D 

141 

7F62 

142 

7FD8 

143 

A1TH,DC,,FFFF, 
A1TL,DC,,9DC9, 
TG2,DC,,50F0, 
REFP2H,DC,,3E10, 
REFP2L,DC,,d6CF, 
A2TH,DC, ,FFFF, 
A2TL,DC,,8b14, 
TG3,DC,,7FFF, 
REFP3H,DC,,3D5A, 
RBFP3L,DC,,CB6F, 
A3TH,DC, ,FFFF, 
A3TL,DC,,6F04, 
TG4,DC,,7FFF, 
, DC,, 0000, 
, DC,, 0000, 
, DC,, 0000, 
, DC,, 0000, 
, DC,, 0000, 
, DC,, 0647, 
,dc,,oc8b, 

,DC,,12C8, 
,DC,,18F8, 
,DC,,1F19, 
.DC,, 2528, 
,DC,,2B1F, 
,DC,.30FB, 
,DC,,36BA, 
,DC,,3C56, 
,DC,,4lCK, 

, DC, ,471c, 
,DC,,4C3F, 

, DC,, 5133, 
,DC,,55F5, 
,DC,,5A82, 
,DC,,5ED7, 
,DC,,62F2, 
,dc,,66cf, 
,dc, ,6a6d, 
,dc,,6dca, 

,DC,,70E2, 

,DC,,73B5, 

, DC,, 764 l, 

, DC,, 7884, 
,DC,,7A7D, 
,DC,,7C29, 
,DC, ,7D8A, 
,DC,,7E9D, 
,IX\,7F6?, 
,DC,,7Fl)8, 
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AUTOPILOT  LISTING  (Cont'd) 


LOC 

OBJECT  CODE 

stmt 

008F 

7FFF 

3 1)1) 

0090 

5500 

1>)5 

0091 

’>000 

11)6 

0092 

7F00 

ll)7 

0093 

1)F00 

11)8 

00S1) 

OBOO 

ll>9 

0095 

OU  1)0 

150 

0096 

0B80 

151 

0097 

0765 

152 

0098 

0A80 

153 

0099 

5CFB 

15li 

009A 

3281 

155 

009B 

5EFE 

156 

009C 

ll)08 

157 

009D 

8L’6f 

158 

009E 

5201 

159 

009F 

C857 

160 

OOAO 

866f 

l6l 

00A1 

130A 

162 

00A2 

5301 

163 

00  A 3 

5101 

161. 

OOAl) 

20AC 

165 

00A5 

521)1 

166 

00A6 

8k6f 

167 

00A7 

5201 

168 

00A8 

C857 

169 

00A9 

866f 

170 

OOAA 

13F8 

171 

OOAB 

5301 

172 

OOAC 

Al)Ol> 

173 

00  AD 

AC05 

17li 

OOAE 

8009 

175 

OOAF 

81)01) 

176 

ooao 

28CB 

177 

00  B1 

A006 

178 

00B2 

A 1)07 

179 

00B3 

8012 

180 

OOBl) 

81)05 

181 

00B5 

28CB 

182 

00B6 

01)  AO 

183 

00B7 

0006 

00B8 

28E1 

181) 

OOB9 

A008 

185 

00  BA 

8009 

186 

OOBB 

81)05 

187 

OOBC 

28CB 

188 

OOBD 

A006 

189 

SOURCE  STATEMENTS 

,DC,,7FFF, 
CHECK, DC,, 5500, 
YREPH,  DC,,  1)000, 

FIN, DC, ,7F00, 
TRANS, LI, 3,000o, 
,SFLG,3,0000, 
,RIN,, 001)0, 
,PFLG,3,0000, 

, CMPB IT , 5 , , 
,PFLG,2,0000, 
,SHR, 0,0005, 
,RCPY,0(2) , , 
,SHR,2,0002, 
,B0C,4,12 
,LD,3,006F(2) , 
,CAI ,2,0001, 
,ADD,2,THE2(0), 
,LD,1,006F(2), 

, noc , 3 , 3 1* , 

,CAI, 3,0001, 

1 3,  CAI,  1,0001, 
,JMP,,Hi(o), 

12, CAI, 2,001)1, 
,LD,3,006F(2), 

, CAT, 2, 0001, 
,Ai)D,2,THE2(0), 
,LD,1 ,006f(2), 

, HOC, 3, 13, 

, CAI, j, 0001, 
lli.ST.I  ,COSPI|(0), 
,ST,3,SINPIi(0), 
,LD,0,A»PH(0), 
,LI),1  ,C0SP"(0) , 
, JSR, ,MUL(0) , 
,ST,0,SCP2(0), 
,st,i,;;cp3(o), 
,LD,0,ADYI1(0) , 
,LD,l,SINPH{0), 
,JSR,,MUI,(0), 
,DAD1),  ,SCP?(0) , 

,JSR,,A0UT(0), 

,ST,0,SCPli(0), 

,LD,0,ADPH(0), 

,Lli,l,STHPH(0), 

,JSR,,MUL(0), 

,ST,0,SCP2(0), 
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AUTOPILOT  LISTING  (Cont'd) 


■— *5^.  — 


LOC 

OBJECT  CODE 

STMT 

SOURCE  STATEMENTS 

OOLE 

Al)C7 

190 

,ST,1,SCP3(0) , 

OOBF 

8012 

191 

,LD,0,ADYH(0), 

OOCO 

em 

192 

,LD,1,C0SPH(0), 

OOC1 

28CB 

193 

,JSR,,MUL(0), 

00C2 

OUBO 

19*i 

,DSUB,,SCP2{0), 

OOC3 

0006 

OOClt 

28E1 

195 

,JSR,,A0UT(0), 

OOC5 

8Lo8 

196 

,LD,l,SCPli(0), 

00C6 

E05!t 

197 

,STin,0,Y0UT(0) 

ooc7 

BU53 

19b 

,STID,1,P0UT(0) 

00C8 

OCOO 

199 

,SFLG,l«,0000, 

OOC9 

1E2A 

200 

l6,B0C,lli,15, 

OOCA 

20C9 

201 

,JMP,,l6(0), 

OOCB 

1211 

202 

t<nJL,B0C,2J00, 

OOCC 

3180 

203 

,RXCH,0(1) , , 

OOCD 

1206 

20li 

,B0C,2,101, 

OOCE 

5101 

205 

,CAI ,1,0001, 

OOCF 

5001 

206 

,CAI, 0,0001, 

OODO 

A003 

207 

102,ST,0,SCP(0) , 

OOD1 

0li80 

208 

,MPY , ,SCP(0) , 

00D2 

0003 

OOD3 

0200 

209 

,Ra'S,,0000, 

OODlt 

5101 

210 

101, CAI, 1,0001, 

OOD5 

A003 

211 

103,ST,0,SCP(0), 

OOD6 

0li80 

212 

,MPY , ,SCP(0) , 

OOD7 

0003 

OOD8 

5000 

213 

, CAI ,0,0000, 

OOD9 

5100 

21>t 

,CAI, 1,0000, 

OODA 

OUAO 

215 

,DADD, ,SCP1  (0) , 

001)B 

0055 

OODC 

0200 

216 

, RTS,, 0000, 

OODD 

3180 

217 

100,RXCH,0(1) , , 

OODE 

12F1 

218 

,B0C,2,102, 

OODF 

5001 

219 

, CAI, 0,0001, 

OOEO 

20D5 

220 

..JMP,, 103(0), 

OOE1 

120E 

221 

AOUT , BOC , 2 , J.3 , 

00E2 

5000 

222 

, CAI, 0,0C  00, 

OOE3 

5100 

223 

,CAI,1,COOO, 

OOEli 

OliAO 

?2lt 

,Daul»,  ,scpi(o)  , 

OOE5 

0055 

OOE6 

IiFOl 

225 

,1,1,3,0001, 

OOE7 

E0F2 

226 

19.SKG ,0,DSA(0) , 

OOE8 

20EE 

227 

, JMP, ,17(0), 

00  E9 

8092 

228 

,LD,0,FIN(0), 

OOEA 

FC56 

229 

20 , SKNE , 3 ,SCP5 ( 0 ) 

OOEB 

0200 

230 

,RTS , , , 

OOEC 

68F3 

231 

,0R,0,PFIN(0), 

OOED 

0200 

232 

,RTS,„ 

OOEE 

5C07 

233 

17, SHI, ,0,0007, 

ookf 

20EA 

23't 

, JMP, ,20(0), 

OOFO 

hFOO 

235 

18,1,1,3,0000, 
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AUTOPILOT  LISTING  (Cont'd) 


LOC 

OBJECT  CODE 

STMT 

SOURCE  STATEMENTS 

OOF! 

20E7 

236 

,JMP, ,19(0), 

00F2 

OOFF 

237 

DSA,))C,,00FF, 

OOF  3 

8000 

238 

PFINjDC, ,8000, 

OOFl) 

IfFOO 

239 

15, LI, 3, 0000, 

OOF5 

OBOO 

21)0 

,SFLG,3,0000, 

OOF6 

01)00 

21)1 

,RIN,,0000, 

OOF7 

OB80 

21)2 

,PFLG,3,0000, 

OOF8 

A0l8 

21)3 

,ST,0,PSIG(0), 

00F9 

OBOO 

2l)l) 

,SFLG,3,0000, 

OOFA 

01)20 

21)5 

,RIN,, 0020, 

OOFB 

0B80 

21)6 

,pfu;,  5,0000, 

OOFC 

AOOF 

21)7 

, ST, 0, THETA (0), 

OOFD 

88lB 

21)8 

.LD.P.S/BADDfO). 

OOFE 

8200 

21)9 

,LD,0,00o?(2), 

OOFF 

D002 

250 

,CUB,0,TN(0), 

0100 

1B11) 

251 

,B0C,11,500, 

0101 

801C 

252 

501,LI>,0,REFPII(0), 

0102 

DOOF 

253 

,SUB,0,T1IETA(0) 

0103 

5C01 

25>i 

,5HL, 0,0001 , 

OlOli 

AOOF 

255 

,ST,0,TIIETA(0), 

0105 

801C 

256 

,LD,0,REFP1I(0) , 

0106 

81)  ID 

257 

,LD,)  ,REFPli(0) , 

0107 

o6ao 

258 

,DADD,, 0003(2), 

0108 

0003 

0109 

A01C 

259 

,ST,0,REFPIf(0), 

010A 

Al)lD 

260 

,ST,.1,REFPL(0), 

010B 

1)F09 

261 

,[.1,3,0009, 

010C 

290F 

262 

,JSR,,CALC(l), 

OlOD 

8091 

263 

,LD,0,YIiEPIl(0) , 

010E 

D018 

261) 

,SUB,0,PSIG(0), 

010F 

5C01 

265 

,SIIL, 0,0001, 

0110 

A018 

266 

,ST,0,PSTG(0), 

0111 

1)F12 

267 

,1.1,3,0012, 

0112 

290 9 

268 

,JSR,,CAL0(1), 

0113 

0C80 

269 

,PFLG,)l,0000, 

oun 

202C 

270 

,JMP,  ,3(0) , 

0115 

1)A05 

271 

500 , AISZ ,2 ,0005 , 

0116 

A81B 

27? 

,ST,2,SEGADD{0) 

0117 

8201 

273 

,I.D, 0,0001(2), 

0118 

A01C 

27 1) 

,ST,0,REFPH(0) , 

0119 

8202 

275 

,LD, 0,0002(2), 

011A 

A01D 

276 

,ST,0,REFPI.(0) , 

011B 

21E5 

277 

,JMP,, 501(1), 

one 

8308 

278 

CALC, 1.0,0,0008(3), 

011D 

81)  5A 

279 

,I,D,1,K2(0), 

011E 

28CB 

280 

,JSR,  ,MUL(0) , 

011F 

liEOO 

281 

, LI, 2, 0000, 

0120 

1201 

282 

,B0C,2,200, 

0121 

hEQO 

283 

, LI, 2, 0080, 

0122 

1)300 

281) 

200, PUSH, 3,, 
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AUTOPILOT  LISTING  (Cont'd) 


LOC 

OBJECT  CODE 

STMT 

SOURCE  STATEMENTS 

0123 

CA00 

285 

,SFIiG  ,2,0000, 

012l( 

I1FO8 

286 

, LI, 3, 0008, 

0125 

1*200 

287 

201, PUSH, 2,, 

0126 

0280 

288 

,PUI.LK, , , 

0127 

58KK 

289 

,HOR, 0,0001, 

0128 

59KF 

290 

,11011,  J ,0003  , 

0129 

1*BFF 

291. 

,A1S'/.,3,00FK, 

012A 

21FA 

292 

,JMP,  ,203  (1  ) , 

01213 

1*700 

293 

, PULL, 7,, 

012C 

1*000 

291* 

,PUSH,0,, 

012D 

1*100 

295 

, PUSH ,1 , , 

01  ?E 

830h 

296 

,LD,0,000li(3), 

0L2F 

8705 

297 

,LD, 3 ,0005(3), 

0130 

120  A 

298 

,BOC, 2,600, 

0131 

5000 

299 

,CAI, 0,0000, 

0132 

5100 

100 

,CAT,1 ,0000, 

0133 

Oil  AO 

301 

,DADD, , SCP1, 

01 3>* 

0055 

,JSR,,MPYB(3  ), 

0135 

2935 

102 

0136 

5000 

301 

,CA I, 0,0000, 

0137 

5100 

10>i 

,CAT ,1  ,0000, 

0138 

Oh  AO 

305 

, DADD,, SCP1, 

0139 

0055 

,.  IMP,,  60.1(1), 

013A 

2101 

306 

013B 

292F 

107 

600, JSH, ,MPYH(3 ) , 

01 3C 

A006 

108 

601 ,ST,0,SCP2(0 ) , 

0130 

Al*  07 

.109 

,ST,3,SCP3(0), 

01  3*3 

1*500 

310 

,rau,.i,, 

01.31'' 

1*1*00 

311 

,PUIiI»,0, , 

01>i0 

01*110 

31  r 

,0SUU,,SCP2(0) 

Ol'il 

0006 

01 1*2 

1*000 

313 

,PUSH,0, , 

Oil*  7 

1*100 

33 1* 

,PUSH,1 , , 
,1-0,0,0002(3), 

01 HL 

8302 

31  r 

01I15 

8707 

316 

,LL, 3, 0003(3), 

oiii  6 

120A 

117 

, BO  1,2 ,700, 

Olli7 

5000 

313 

,CAJ, 0,0000, 

01I48 

5100 

319 

,CAI, 1,0000, 

01I19 

Ol*  AO 

320 

,DAI)!),,SCP3  , 

OjliA 

0055 

oil*  B 

29I16 

721 

,JSH,  ,MI’YA(  1 ) , 

OlLC 

5000 

322 

,CA1, 0,0000, 

OlhD 

5100 

327 

,CAr,3  ,0000, 

OlliE 

Ol*  AO 

12>! 

,0A1)I),  ,SCPl| 

Oil*  ¥ 

00511 
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AUTOPII.OT  LISTING  (Cont'd) 


loc 

OBJECT  CODE 

STMT 

SOURCE  STATEMENTS 

0150 

2101 

325 

701(1), 

0151 

29*»0 

326 

700  ,JSR, ,MPYA(l) , 

0152 

0A00 

327 

701 ,SFLG  ,2,0000 , 

0153 

5D01 

328 

,SHL,1 ,0001 , 

015>( 

5801 

329 

,ROL, 0,0001, 

0155 

A006 

330 

,ST,0,SCP?(0), 

0156 

A*i07 

331 

,ST,l,SCP3(0), 

0157 

lt500 

332 

, PU1<Ij  , 1 , , 

0158 

1*1»00 

333 

,PULL,0,, 

0159 

0*iA0 

33>i 

,DA1>D,,SCP2(0), 

015A 

0006 

, LI), 2, 0007(3), 

015B 

8K07 

335 

015C 

AB08 

336 

, ST, 2,0008(3), 

0150 

8B06 

337 

,LD, 2,0006(3), 

015E 

AB07 

338 

, ST, 2, 0007(3), 

015F 

8B03 

339 

,1,0,2,0003(3), 

0160 

AB05 

3’fO 

, ST, 2,0005(3), 

0l6l 

8B02 

3'd 

,1.0,2,0002(3), 

0162 

AB0>l 

3'(2 

,ST,2,000li(3), 

0163 

A300 

31(3 

, ST, 0,0000(3), 

0l6li 

A701 

3'd( 

, ST, 1,0001(3), 

0165 

OAOO 

3*(  5 

,SELG,2,0000, 

0166 

5D01 

3*16 

,SH1„  1,0001, 

0167 

5801 

3»'7 

,R0L, 0,0001, 

0168 

A302 

31(8 

, ST, 0, 0002(3) , 

0169 

A703 

3I19 

, ST, 1,0003(3), 

0l6A 

0200 

350 

, RTS , , , 

016  B 

liOOO 

351 

MPYB,PU0H,0, , 

016c 

IiLOO 

352 

,PUSH,.l , , 

oi6d 

81(59 

353 

,LI),1,B(0), 

oi6e 

A003 

35*( 

,ST,0,SCP(0) , 

oi6f 

0>(80 

355 

,MPY , ,GCP(0) , 

0170 

0003 

0171 

A006 

356 

,ST,0,SCP2(0) , 

0172 

Al(07 

357 

,ST,1,SCP3(0), 

0173 

lihOO 

358 

, PULL ,0 , , 

OI7*i 

0(\80 

359 

,PF1G,2,0000, 

0175 

%w 

360 

,SHR, 0,0001 , 

0176 

81(59 

361 

,LD,l,B(0), 

0177 

A003 

362 

,ST,0,SCP(0), 

0178 

0I180 

363 

,MPY , ,SCP(0) , 

0179 

0003 

AUTOPILOT  LISTING  (Cont'd) 


r 


t 

f. 

> 

i 


LOC 

OBJECT  CODE 

STMT 

017  A 

OAOO 

364 

017  B 

5D01 

365 

017C 

5801 

366 

017D 

3181 

367 

017E 

4C00 

368 

017F 

04A0 

369 

0180 

0006 

0181 

A006 

370 

0182 

A407 

371 

0183 

8136 

372 

0184 

0A80 

373 

0185 

5 OFF 

374 

0186 

4500 

375 

0187 

A003 

376 

0188 

A480 

377 

0189 

0003 

018A 

OAOO 

378 

Ol8B 

5D01 

379 

Ol8C 

5801 

380 

018D 

3181 

381 

018E 

4C00 

382 

018F 

04A0 

383 

0190 

0006 

0191 

0200 

384 

0192 

4000 

385 

0193 

4100 

386 

0194 

8458 

387 

0195 

A003 

388 

0196 

0480 

389 

0197 

0003 

0198 

A006 

390 

0199 

A407 

391 

019A 

4400 

392 

019B 

0A80 

393 

019C 

5CFF 

394 

019D 

8458 

395 

019E 

A003 

396 

019F 

0480 

397 

01  AO 

0003 

01A1 

OAOO 

398 

01A2 

5D01 

399 

01  A3 

5801 

400 

01A4 

3181 

401 

01A5 

4C00 

402 

01A6 

04A0 

403 

01A7 

0006 

SOURCE  STATEMENTS 

,SFLG,2,0000, 

, SHI,,  1,0001, 
,ROL, 0,0001, 
,RCPY,0(1) , , 

, LI ,0,0000, 
,DADD,,SCP2, 

,ST,0,SCP2(0) , 
,ST,1,SCP3(0), 
,LD,0,BL(1), 
,PFLG,2,0000, 
,SHR, 0,0001, 
,PULL,1, , 

* ,ST,0,SCP(0) , 
,MPY , ,SCP(0) , 

,SFLG,2,0000, 
,SHL, 1,0001, 
,R0L, 0,0001, 

, ROPY, 0(1) , , 
,LI, 0,0000, 
,DADD, ,SCP2(0) , 

,RTS, , , 

MPYA,PUSH,0, , 
,PUSH,1, , 
,LD,1,A(0), 
,ST,0,SCP(0) , 
,MPY,,SCP(0), 

,ST,0,SCP2(0), 
,ST,1,SCP3(0), 
,PULL,0, , 
,PFLG,2,0000, 
,SHR, 0,0001, 
,LD,1,A(0), 
,ST,0,SCP(0), 
,MPY, ,SCP(0), 

,SFLG,2,0000, 
,SIIL, 1,0001, 
,ROL, 0,0^01, 

, ROPY, 0(1),, 

, LI, 0,0000, 
,OADD, ,SCP2, 


68 


AUTOPILOT  LISTING  (Cont'd) 


LOC 

OBJECT  CODE 

STMT 

01A8 

A006 

ItOlt 

01A9 

AN07 

1|05 

01AA 

810E 

ft  06 

01AB 

oa8o 

1)07 

01AC 

5CFF 

1)08 

01AD 

ft  500 

1)09 

01AE 

A003 

1)10 

01AF 

0N80 

1)11 

01  BO 

0003 

01B1 

OAOO 

1)12 

01B2 

5D01 

1)13 

01B3 

5801 

lillt 

OlBli 

3181 

1)15 

01B5 

ItCOO 

I1I6 

01B6 

OltAO 

lil7 

01B7 

0006 

01B8 

0200 

1)18 

01B9 

F902 

1)19 

01  BA 

OA68 

!(20 

01BB 

8120 

1)21 

01BC 

292li 

1)22 

01 BD 

811F 

1)23 

01BE 

2922 

1)21) 

01 BF 

811F 

1)25 

01C0 

2920 

1)26 

01C1 

811C 

1)  27 

01C2 

291E 

1)28 

01C3 

8117 

1)29 

OlClf 

A001 

1)30 

01C5 

ItCOO 

1)31 

01  c6 

A002 

1)3? 

01C7 

NF12 

1)33 

0IC8 

1iE09 

1)3!) 

01 C9 

A200 

1)35 

OIC.. 

ft  AO  1 

1)36 

01 CB 

ItBFF 

1)37 

OICC 

21 FC 

I138 

01CD 

ltC5B 

1)39 

01CE 

A01B 

IthO 

01CF 

805C 

1)1)1 

01D0 

A01C 

1)1)2 

01D1 

8050 

1)1)3 

0102 

A01D 

l)l)li 

0103 

>tC00 

1)1)5 

SOURCE  STATEMENTS 

,ST,0,SCP2(0), 
,ST,1,SCP3(0), 
,LD,0,AL(l ) , 
,PFLG,2,0000, 
,SHR, 0,0001, 
,PULL,1, , 
,ST,0,SCP(0), 
,MPY,,SCP(o), 

,SFLG,2,0000, 
,SHL, 1,0001 , 
,ROL, 0,0001, 
,RCPY,0(I) , , 

, LI, 0,0000, 
,I)ADD,  ,SCP2(0) , 

, RTS , , , 
AL,DC,,F902, 
BL,DC,,OA68, 

INTT  ,I.!),0,PTEN(l ) , 

, FOL’LAY  ( 1 ) , 
,L0,0,PFlVE(l), 
,JSR,  ,FDEI.AY(l ) , 
,LD,0,HFIVE(1), 
,JSR,,FDEI.AY(l), 
,LD,0,NTEN(] ), 
,JSR,  ,FDELAY(3  ) , 
,LD,0,INTl(l ) , 
,ST,0,1HT2(0) , 

, LI ,0.0000, 
,ST,0,TN(0), 

, LI, 3, 0012, 

, LI, 2, 0009, 

605, ST, 0,0000(2), 
,AISZ,2,0001 , 
,AISZ,3,00FF, 
,JMP,,605(l), 

, LI, 0,0050, 
,ST,0,SfX!ADD(0) , 
,LP,0,REFD  li(0) , 
,ST,0,REFPH(0), 
,LB,0,REFP1L(0), 
,ST,0,REFPL(0), 

, LI, 0,0000, 


I 
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AUTOPILOT  LISTING  (Cont'd) 


LOC 

OBJECT  CODE 

STMT 

SOURCE  STATEMENTS 

01D4 

B053 

Mi  6 

,STID,0,P0UT(0), 

01D5 

B05^ 

!|1i7 

,STID,0,YOUT(0), 

01D6 

B052 

Mi8 

,STID,0,C0UT(0), 

01D7 

8090 

Vi9 

,LD,0, CHECK, 

01D8 

0900 

1*50 

,SFI/G,1  ,u000, 

01D9 

B052 

li5l 

,STID,0,C0UT(0), 

01DA 

202C 

li52 

,JMP,,3(0), 

01DB 

2020 

'i53 

INTI, DC,, 2020, 

01DC 

FFOO 

li5li 

PTEN, DC,, FFOO, 

01DD 

COOO 

1i55 

PFIVE, DC , ,C000, 

01DE 

7F00 

1.56 

NTEfl  ,DC , ,7FOO , 

01DF 

liOOO 

>i57 

NEIVE,DC,,liOOO| 

01 EO 

753C 

It  58 

DELAY, DC,, 753C, 

01  El 

B053 

Ii59 

KDELAY,STID,0  ,P0UT(0) , 

01E2 

B05>t 

li60 

,stid,o,yoijt(o). 

01E3 

ltDOE 

l»6l 

,LI ,1 ,OOOE, 

OlEil 

81FB 

li62 

900,LD,0,Di:i.AY(l), 

01E5 

!i8FF 

1.63 

9Ol,AIS7,,O,00FF, 

01E6 

21 FE 

li6). 

,JMP,,90J(1), 

01E7 

1*9FF 

1.65 

, AIS7,  ,1 ,00FF, 

01E8 

21FB 

J.66 

,JMP,, 900(1), 

01E9 

0200 

1.67 

>RTS, , , 

01EA 

21D0 

468 

,JMP, , INTI (3 ) , 

01EB 

21CF 

469 

,JMP, , INTI  (l ) , 

01FE 

2500 

470 

, JMPID, , INTIl(l) 

01FF 

01EA 

471 

INTIl,DC, ,01EA 

70 


ROM  LOADER  LISTING 


LOC 

OBJECT  CODE 

STMT 

SOURCE  STATEMENTS 

FF13 

0F80 

20 

TTY.PFLOJ.OOOO, 

FFll* 

8182 

21 

,LD,0,LFCR(1), 

FF15 

295A 

22 

,JSR,,XMIT(l), 

FF16 

8181 

23 

,LD,0,OC(1), 

FF17 

2958 

2h 

,JSR,,XMIT(l), 

FF18 

8180 

25 

,LD,0,MM(1), 

FF19 

2956 

26 

,JSR,,XMIT(1), 

FF1A 

817F 

27 

,LD,0,NA(l) , 

FF1B 

295>* 

28 

,JSR,,XMIT(1), 

FF1C 

017E 

29 

,LD,0,SICD(l), 

FHL> 

2952 

30 

,JSR, ,XMIT(l ) , 

FF1E 

2D50 

31 

,JSRID, ,50(1 ) , 

FF1F 

E562 

32 

,SKG,l,F0UR(l), 

FF20 

2101 

33 

,JMP, ,11(1 ) , 

FF21 

21F1 

3>* 

, JMP , ,TTY  ( 1 ) , 

FF22 

E55D 

35 

11,SKG,1,0NE(1), 

FF23 

2140 

36 

,JMP,,WRITE(l), 

FF2lt 

E55C 

37 

,SKG,l,TW0(l), 

FF25 

2131 

38 

,JMP,,READ(1), 

FF26 

2962 

39 

LIST,JSR, ,W0RDR(1 ) , 

FF27 

E55A 

HO 

,SKG.l,FOUR(l) , 

FF28 

21EA 

ltl 

,JMP,,.TTY(1), 

FF29 

1(000 

42 

,PU5H,0, , 

FF2A 

295E 

1*3 

,jSR,,wo8Pi:(i), 

FF2B 

4700 

'(!( 

, PUI.L, 3, , 

FF2C 

E555 

1*5 

,SKG,.l,F0UR(l), 

FF2D 

21E5 

1*6 

,JMP,,TTY(l), 

FF2E 

1(000 

1(7 

.PUSIl.O,, 

FF2F 

1(300 

1(8 

.PUSH, 3,, 

FF30 

8166 

1(9 

,LD,0,LFCR(1), 

FF31 

293E 

50 

,JSR,,XMIT(1 ), 

FF32 

8169 

51 

,LD,0,0L(1) , 

FF33 

293C 

52 

,JSR,  ,XMIT( 1) , 

FF3l< 

8168 

53 

,LD,0 ,SPC(l ) , 

FF35 

293A 

51* 

,JSR, ,XMIT(l ) , 

FF36 

8167 

55 

,LD,0,SPSP(1), 

FF37 

2938 

56 

,JSR,,XMIT(  ), 

FF38 

8166 

57 

,LD,0,AD( 1 ' , 

2936 

58 

,JSR,,XMT'.U), 

■ .A 

8165 

59 

,LD,0,Ai(l ) , 

rF3B 

293<( 

60 

,JSR,,XMIT(1), 

FF3C 

015A 

61 

,LD,0,LFCH(l ) , 

FF3D 

2932 

62 

,JSR,,XMIT(1), 

FF3E 

3158 

63 

,L1),0,LFCR(1 ) , 

FF3F 

2930 

61. 

,JSR,,XMIT(1), 

Preceding  page  blank 


ROM  LOADER  LISTING  (Cont) 


LOC 

OBJECT  CODE 

STMT 

SOURCE  STATEMENTS 

FF40 

4700 

65 

, PULL, 3,, 

FF4l 

4600 

66 

,PULL,2, , 

FF42 

3D31 

67 

,RCPY,3,(1), 

FFl*3 

5102 

68 

,CAI, 1,0002, 

ff44 

3600 

69 

,RADD,1(2) , , 

FF45 

3D81 

70 

16,RCPY,3(1) , , 

FFU6 

4200 

71 

, PUSH, 2, , 

T47 

4300 

72 

.PUSH, 3,, 

FF48 

2958 

73 

,JSR, ,WORDS(l) , 

FFl»9 

8154 

74 

,LD,0,SPSP(1), 

FF4A 

2925 

75 

,JSR,,XMIT(1), 

FF4b 

4700 

76 

, PULL, 3, , 

FF4C 

8700 

77 

,LD, 1,0000(3), 

FF4d 

4300 

78 

.PUSH, 3,, 

FFl*E 

2952 

79 

,JSR, ,W0RDS(1) , 

FF4F 

8147 

80 

,LD,0,LFCR(1), 

FF50 

291F 

81 

,JSR,,XMIT(l), 

FF51 

4700 

82 

.PULL, 3,, 

FF52 

4600 

83 

.PULL, 2,, 

FF53 

CD2C 

84 

,ADD,3,0NE(1), 

FF54 

4aff 

85 

,AISZ,2,00FF, 

FF55 

21 EF 

86 

,JMP, ,l6(l) , 

FF56 

21BC 

87 

,JMP, ,TTY(l ) , 

FF57 

OFOO 

88 

READ , SFLG ,7,0000, 

FF58 

2930 

89 

,JSR,,W0RDR(1), 

FF59 

3381 

90 

,RCPY ,0(3) , , 

FF5A 

4300 

91 

30, PUSH, 3,, 

FF5B 

292D 

92 

,JSR,,W0RDR(1), 

FF5C 

4700 

93 

.PULL, 3,, 

FF5D 

E524 

94 

,SKG,1 ,FOUR(l) , 

FF5E 

2103 

95 

,JMP,,31(1), 

FF5F 

A300 

96 

, ST, 0, 0000(3) , 

FF60 

CD1F 

97 

,ADD,3,0NE(1), 

ff6i 

21F8 

98 

,JMP,,30(1), 

FF62 

0F80 

99 

31,  PFI-G  ,7,0000, 

FF63 

21AF 

100 

,JKP,,TTY(l), 

FF64 

2924 

101 

WRITE, JSR, ,HORDH(l ) , 

FF65 

E51C 

102 

,SKG,l,FOUR(l) , 

FF66 

21AC 

103 

,JMP,,TTY(1), 

FF67 

4000 

104 

.PUSH.O, , 

,JSR, ,WORDR(l) , 

FF68 

2920 

105 

?f69 

4700 

106 

.PULL, 3,, 

FF6a 

E517 

107 

,SKG ,1 ,FOUR(l ) , 

ff6b 

21A7 

108 

,JMP,,TTY(1), 

FF6c 

A300 

109 

,ST,0, 0000(3), 

ff6d 

21A5 

110 

,JMP,  ,TTY(l ) , 

ff6e 

0000 

111 

.DC, ,0000, 

73 


1 - ~ 


•M" 


ROM  LOADER  LISTING  (Cont) 


LOC 

FF6F 

FF70 

FF71 

FF72 

FF73 

FF7li 

FF75 

FF76 

FF77 

FF78 

FF79 

FF7A 

FF7B 

FF7C 

FF7D 

FF7E 

FF7F 

FF80 

FF8l 

FF82 

FF83 

FF8!( 

FF85 

FF86 

FF87 

FF88 

FF89 

FF8A 

ff8b 

FF8c 

FF8D 

FF8E 

FF8F 

FF90 

FF91 

FF92 

KF93 

FF9*t 

FF95 

FF96 

FF97 

FF98 

FF99 

FF9A 

FF9B 

FF9C 

FF9D 

FF9E 


OBJECT  CODE 


STMT 


SOURCE  STATEMENTS 


FFB8 
0A80 
OCOO 
2910 
1*E08 
0C80 
1301 
OCOO 
290B 
5CFF 
l*AFF 
23  F9 
0C80 
2906 

15F1 

0200 

0001 

0002 

0001 

8l)0li 

ItBFF 

21FE 

0200 

01|<SF 

02Fli 

ItCOO 

f*EOl* 

Ii200 

5C0l* 

1(000 

2929 

1*700 

3C00 

I16OO 

E5EF 

0200 

liAFF 

21F5 

0200 

8A8D 

CFC3 

CDCD 

CEC1 

BACA 

CFCC 

A0C3 

AOAO 


112 

113 

111* 

115 

116 

117 

118 
13  9 
120 
121 
122 
123 
121* 

125 

126 

127 

128 

129 

130 

131 

132 

133 
13A 

135 

136 

137 

138 
3 39 
11*0 
11*3 

U*  2 
3'i3 
3 Mi 

II15 
H16 
13*7 
13*8 
1 1*9 
150 

151 

152 

153 
15!* 

155 

156 
157 
150 
159 


50,DC, ,FFB8, 
XMIT,PFLG  ,2 ,0000 , 
,SLFG,1*  ,0000, 
,JSR, ,DELAY(1) , 
,1,1,2,0008, 
l*,PFLG,l*,OOO0, 
,BOC,3,3, 
,SFLG,l|,0000, 
3,JSR,,DELAY(1), 
,SHR, 0,0001, 
,AISZ,2 ,00FF, 
,«IMP , ,l*(l ) , 
,PFLG  ,1*  ,0000, 
,JSR , ,DELAY(l ) , 
,JSR, ,DELAY(l) , 
,BOC ,5 ,XMIT, 

, RTS , , , 

ONE, DC,, 0001, 

TWO, DC,, 0002, 

FOUR, DC,, 0001* , 

DELAY, LD,3,V2(1), 
2,AISZ,3,00FF, 
,JMP,,2(1), 
,RTS,,, 
Vl,DC,,0l*6F, 
V2,DC,,02FI*, 

UORDR, LI, 0,0000, 

, LI  ,2,0001*, 

20, PUSH,?,, 

,SHL,  0,0001*, 
.PUSH ,0, , 
,JSR,,RECV(1), 
.PULL, 3,, 

,RADD, 3(0) , , 
,1-ULL,?,, 

,SKO , 1 ,F0UR(1 ) , 

, RTS , , , 
,AISZ,2,00FF, 
,J1!P,  ,20(3  ) , 

> 83'S , , , 

LFCR,DC,,8A8D, 

OC.DC, ,CFC3, 

(•W, DC, , CDCD, 

na,dc,,ci;ci  , 

SICD.DC,  ,BAC)i , 

OL, DC,, CFCC, 
SPC,DC, ,A0C3 , 

6 PSP, DC,, AO AO, 
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ROM  LOADER  LISTING  (Cont) 


t' 


LOC 

OBJECT  CODE 

STMT 

SOURCE  STATEMENTS 

1 

FF9F 

ClClt 

160 

AD,DC,,ClCli, 

r 

FFAO 

C1D!) 

l6l 

AT,DC,,ClDl|, 

FFA1 

ItEOl) 

162 

WORDS,  LI  ,2,0001* , 

“ 1 

t 

FFA2 

0A80 

163 

17 ,PFLC ,2,0000, 

FFA3 

?90*4 

161. 

,ROL,  1 ,000)., 

I 

FFAli 

3l»8l 

165 

,RCPY,1(0) , , 

FFA5 

610E 

166 

,AUD,0,B1.ANK(1) 

r 

FFA6 

690E 

167 

,OR,0,C(1), 

■ 

FFA7 

ElOE 

168 

,SKG,0,C9(1), 

* 

FFA8 

2109 

169 

,JMP, ,300(l ) , 

\ 

FFA9 

D142 

170 

,SUB,0,MINE(1), 

% 

i 

FFAA 

lilOO 

171 

301, PUSH, 1,, 

* 

i 

FFAB 

li200 

172 

,1*0811,2 , , 

' 

FFAC 

29C3 

173 

,JSR,,XMIT(1), 

L 

? 

FFAD 

1*600 

171* 

, PULL, 2, , 

tf 

* 

FFAE 

Ilf  00 

175 

,PULL,1, , 

FFAF 

1«AFK 

176 

,AISZ,2,00FF, 

\ 

l 

FFBO 

21  FI 

177 

,JMP,,17(1), 

FFB1 

0200 

178 

,RTS,,, 

r 

FFB2 

ClOl* 

179 

300 ,ADD,0,B(1 ) , 

- 

FFB3 

21F6 

180 

,JMP,,  301(1), 

V, 

s. 

FFBli 

OOOF 

181 

BLANK, DC,, OOOF, 

FFB5 

OOCO 

182 

C, DC,, OOCO, 

FFB6 

00C9 

183 

C9,DC,,OOC9, 

FF37 

FFFO 

18). 

B,  DC,, FFFO, 

c 

FFB8 

liDOl 

185 

RECV, LI, 1,0001, 

FFB9 

hcoo 

186 

, LI ,0,0000, 

f 

FFBA 

•’iE07 

187 

, LI, 2, 0007, 

FFBB 

1E01 

188 

6,BOC,]l.,5, 

I 

FFBC 

21FE 

189 

,JMP,,6(1), 

E 

FFBD 

8DC9 

190 

5,LD, 3, Vl(l) , 

c 

FFBE 

29C5 

J91 

,JSR, ,2(1 ) , 

FFBF 

1E01 

192 

8,BOC,]l*,7- 

FFCO 

3l*00 

193 

,RADD,1(0) , , 

k 

y 

FFCi 

‘jDOl 

19li 

7, DHL, 1,0001, 

i. 

FFC2 

29C0 

195 

,JSR , , DELAY  ( 1 ) , 

*c 

FFC3 

ItAFF 

196 

,AISZ,2,00KF, 

FFCll 

21FA 

197 

,.IMP,,8(l), 

\ 

* 

FFC5 

29BD 

198 

,JSR, ,DELAY(  1 ) , 

if 

FFC’6 

1*  Dili 

199 

, LI  ,1,0011* , 

? 

FFC7 

890D 

200 

,LD,?,DATA(1), 

£ 

FFC8 

1*000 

201 

9. PUSH, 0, , 

i 

FFC9 

D200 

202 

, SUB, 0,0000(2), 

i 

FFCA 

C9D5 

203 

,ADD,2 ,ONE( 1 ) , 

i 

FFCB 

1101* 

201* 

,BOC,1 ,10, 

I 


75 


■■  1 K , 


* 
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LOC 

OBJECT  CODE 

STMT 

FFCC 

4400 

205 

FFCD 

49FF 

206 

FFCE 

21F9 

207 

FFCF 

21E8 

208 

FFDO 

4400 

209 

FFD1 

6ll8 

210 

FFD2 

E518 

211 

FFD3 

Cll8 

212 

FFD4 

0200 

213 

FFD5 

FFD6 

214 

FFD6 

0030 

215 

FFD7 

0031 

216 

FFD8 

0032 

217 

FFD9 

0033 

218 

FFDA 

0031* 

219 

FFDB 

0035 

220 

FFDC 

0036 

221 

FFDD 

0037 

222 

FFDE 

0030 

223 

FFDF 

0039 

224 

FFEO 

0041 

225 

FFE1 

0042 

226 

FFE2 

0043 

227 

FFE3 

0044 

228 

FFEli 

0045 

229 

FFE5 

0046 

230 

FFE6 

0021 

231 

FFET 

004  C 

232 

FFE8 

0052 

233 

FFE9 

0057 

231* 

FFEA 

OOOF 

235 

FFEB 

OOOA 

236 

FFEC 

0009 

237 

FFED 

0003 

238 

FFEE 

0900 

239 

FFEF 

2500 

240 

FFFO 

FF13 

241 

FFFE  2500  242 

FFFF  FF13  243 


SOURCE  STATEMENTS 

,PULL,0, , 
,AISZ,1,00FF, 
,JMP,,9(l), 
,JHP,,RECV(1), 
10, PULL, 0,, 
,AKD,0,TR(1), 
,SKG ,1 ,TEN(1 ) , 
,ADD,0,IIINE(l}, 
,RTS,,, 

DATA,DC,,FFD6, 

,DC, ,0030, 
,Dc,,oon, 

,DC , ,00  j2 , 

, DC,, 0033, 

, DC,, 0034, 

, DC, ,0035, 

, DC, ,0036, 

, DC, ,0037 , 

, DC,, 0038, 

,DC,  ,0039, 
,DC,,004l, 
,DC,,0042, 

,DC , ,007*3, 

,DC,,00lil|, 

,DC,,00li5, 

, ,C0-i6 , 

,DC, ,0021 , 
,DC,,004C, 

,DC, ,0052, 

,DC , ,0057 , 
TR,DC,,000F, 

TEN, DC, ,000A, 

NINE, DC,, 0009, 

THREE , DC , ,0003 , 

,SFLG, 1,0000, 
,JMPID, ,TTYB(1) 
TTYB,DC,,FF13, 


, JMPID, ,TTYB1(1) 
TTYBl.DC, ,FF13, 


Appendix  E 

Definition  of  Term* 


A : 

MSP  of  A 

(7)  and  (8) 

AL  : 

LSP  of  A 

Eqs.  (7)  and  (8) 

ACO  : 

Accumulator  0 of  the  TDY -52B 

AC  1 : 

Accumulator  1 of  the  TDY52-B 

AC2  : 

Accumulator  2 of  the  TDY-52B 

AC3  : 

Accumulator  3 of  the  TDY-52B 

ADPH  : 

MSP  of  A DP 

Eq.  (7) 

ADPL  : 

LSP  of  ADP 

Eq.  (7) 

ADPH1 : 

MSP  of  ADP1 

Eq.  (7) 

ADPL1 : 

LSP  of  ADP1 

Eq.  (7) 

ADPH2 : 

MSP  of  ADP2 

Eq.  (7) 

ADPL2 : 

LSP  of  ADP2 

Eq.  (7) 

ADYH  : 

MSP  of  ADY 

Eq.  (8) 

ADYL  : 

LSP  of  ADY 

Eq.  (8) 

ADYH1 : 

MSP  of  ADY  1 

Eq.  (8) 

ADYL1 : 

LSP  of  ADY1 

Eq.  (8) 

ADYH2 : 

MSP  of  ADY2 

Eq.  (8) 

ADYL2 : 

LSP  of  ADY2 

Eq.  (8) 

B : 

MSP  of  B 

Eqs.  (7)  and  (8) 

BL  : 

LSP  of  B 

Eqs.  (7)  and  (8) 

COUT  : 

Address  of  clock  latch,  a store  instruction  to  this  address  will  cause 
bits  8 through  15  to  be  loaded  in  the  clock  latch  (see  Figure  4). 
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DATA  (2+000F.„)  : Used  bv  the  flow  charts  to  reference  the  memory  contents  at  i 

the  memory  locution  computed  by  adding  AC2  to  OOOFjg.  j 

F8  : TDY-52B  general  purpose  output  flag  8 which  may  be  set  at  T2  or  reset  f 

at  T6  under  software  control.  There  are  6 flags  available. 

INTEN  : Interrupt  Enable  Flag  when  set  under  software  control  enables  TDY-52B 

internal  interrupt  structure.  . 

INTRA  : TDY-52B  interrupt  signal  input  which  is  sampled  under  hardware  control  ' 

during  T3  to  detect  an  interrupt.  If  set  the  next  instruction  executed  is 
from  memory  location  000  l^g. 

K2  : K2  of  Eq.  (6) 

LIFO  : Refers  to  the  TDY  -52B  16  word  by  16  bit  Last  In/ First  Out  Shift 
register,  that  is,  stack. 

LSD  : Least  Significant  Digit 

LSP  : Least  Significant  Part 

MSD  : Most  Significant  Digit 

MSP  : Most  Significant  Part 

POUT  : Address  of  Pitch  Latch,  a store  instruction  to  this  address  will  cause 
bits  8 through  15  to  be  loaded  in  the  Pitch  Latch  (see  Figure  4). 

0 : Gyro  Roll  position  angle. 

♦g  : Gyro  Yaw  position  angle. 

PSIG  : *g 

PSIG1  : PSIG  one  sampling  period  removed. 

PSIG2  • PSIG  two  sampling  periods  removed,  Eq.  (8). 

PULSE  : Refers  to  the  setting  and  resetting  of  a TDY -52B  Flag  during  the  same 

microcycle. 

REFPH:  MSP  of  current  Pitch  Reference  (see  Figure  23). 

REFPL:  LSP  of  current  Pitch  Reference  (see  Figure  23), 

REFPH1  : MSP  of  starting  value  of  Pitch  Reference  for  line  segment  ending 
at  time  tgj  (see  Figure  25). 

REFPL  1 : LSP  of  starting  value  of  Pitch  Reference  for  line  segment  ending  at 
time  tgj  (see  Figure  25). 

SEGADD  : Address  of  TGI,  TG2  or  TG3  (see  Figure  23). 

SEL  : TDY-52B  Select  Flag. 

STACK  1 : Reference  to  location  one  of  the  LIFO, 

fig  : Gyro  Pitch  position  Angle. 

THETA:  fig 

THETA  1:  THETA  one  sampling  period  removed. 

THETA2:  THETA  two  sampling  periods  removed,  Eq.  (7). 

TTY  : Mnemonic  for  ASR-33  Teletype. 

TF  : Time  to  zero  fins. 

TF3  : TF  + 100  ms,  time  to  initiate  lock  fins  pyrotechnic 

TI  : Time  to  initiate  actuator  pyrotechnic 

TI3  : Tl+lOOms 
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TL  : Launch  time  - not  used 
T2  : Second  Stage  ignition  time 

[ACOfACl]  : Refers  to  32  bit  word  formed  by  AGO,  MSP,  and  AC  1,  LSP. 
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